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TK 90X: MICRaOMPUTADOR.. 


Para você que quer explorar 
todo o potencial do seu micro 
TK 90X como ferramenta de 
trabalho e como fonte de lazer 
criativo, a Cibertron tem 
novidades. “O Artista”, "Controle 
de Estoque”, “Banco de Dados”* 
e “Planilha 90X”*, ao preço de 
Cz$ 99,90 cada, sáo os novos 
programas que a Cibertron está 
lançando. Aproveite e conheça 
também os já tradicionais Jogos 
e aplicativos Cibertron para 
o TK 2000 e TK 85. 

...E NÂO APENAS VIDEOGAME. 
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^ CIBERTROn 

ViX S O F T W >4 R E 


Adquira o Software Cibertron nos revendedores abaixo. Caso você não encontre o programa desejadc, 
peça-o à Cibertron Eletrônica Ltda. Caixa Postal 17005 — CEP 02399 - SP, anexando ao pedido um 
cheque nominal (remessas em três dias úteis). Solicite, gratuitamente, a nossa lista de programas. 


Revendedores autorizados: 


QfiKiro/om 

RPamplona982 Tel 2881900 
Al Jaú 661 (esq Pamplona) 
Tel 284 9644 




UliPTKA 



Tel. (011)255 7653 


SANTO ANDRÉ 



RGalGlicério430 Tel 444 6055 
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MICROHOBBY 


EDITORIAL 


E sta edição de MICROHOBBY estará presente no maior evento da área de 
informática no Brasil. O lnfo/86 que leva o lema da informática como 
instrumento de desenvoivimento apresentará com certeza (no Riocentro, 

Rio de Janeiro), a tendência dos lançamentos voltados aos equipamentos de 16 
bits, com a maioria dos fabricantes nacionais apresentando a sua força e cada 
um, a seu modo, tentando mostrar ao público a consolidação de sua Empresa no 
mercado. 

O XIX Congresso Nacional de Informática não trará muitas inovações em sua 
estrutura organizacional, pois estará recheado de palestras técnicas e 
programações especiais, com convidados internacionais e debates que abordam 
assuntos referentes à política nacional para o setor. Quanto à Feira, aguarda-se 
uma maior área dedicada à exposição e melhorias na infraestrutura do Riocentro - 
reivindicação antiga dos expositores e que vem sendo prometida pelos 
organizadores para este ano. 

Acreditamos que um dos temas a serem debatidos no Congresso será, 
provavelmente, aquele relacionado à política de software. Este assunto vem tendo 
bastante espaço na imprensa diária e tem levado a inúmeras discussões, tanto a 
nível governamental como por parte de usuários e empresários do setor. Vamos 
aguardar e ver como serão os debates a este respeito e torçamos para que algo 
de novo seja gerado nestes debates. 

A MICROHOBBY trará, na próxima edição, os resultados das palestras do 
XIX C.N.I. e publicará a tendência das discussões notadas nas mesmas. Traremos 
também, os principais lançamentos da Feira. 

Para esta edição escolhemos, como tema principal, o artigo “Linguagens de 
Programação”, cujo assunto continuaremos explorando em edições futuras. 
Mostramos também um lançamento da Microdigital, que será de bastante 
utilidade para os usuários do TK-90X. O Light-pen é um periférico há muito 
esperado por estes usuários e que agora se encontra no mercado. 

Finalizando, gostaria de deixar de lado as formalidades e colocar aqui um 
recado muito especial a todos os nossos leitores: 

— “Obrigado pela receptividade e apoio que vocês têm nos dado. As críticas 
e novas idéias que nos enviam são a nossa “principal inspiração” (não é 
demagogia, não!). 

A vocês, associados do nosso Ciube de Usuários, deixamos um especial 
agradecimento pelas respostas enviadas à nossa pesquisa. 

Até mais I 


* Envie-nos, de volta, a pesquisa que passamos a publicar nesta edição, sobre a opinião de vocês a repeito das 
seções da MICROHOBBY. 


Ana Lúcia de Alcântara Oshiro 
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MICROHOBBY 


CARIAS 


C. 001 


MIcrohobby 
Rua do Bosque, 1234 
Sâo Paulo, 01136 


Dúvidas técnicas sobre programas 
e equipamentos apenas por carta. 
Não respondemos por teiefone. 


Prezados Senhores, 

Gostaria de saber como é que eu te¬ 
nho de proceder para obter o livro Enten¬ 
dendo a ROM do TK-2000II; livro comen¬ 
tado na Revista de número 30, na seção 
de cartas. Gostaria também, que me aju¬ 
dassem a encontrar os seguintes livros: 

- Synertek 6500 Hardware Manual 

- 6502 Assembly Language 
Programming/Lance A. Leventhal 

- 6502Assembly Language Subroutines/ 
Lance A. Leventhal 

fyiarcelo Caetano de Oliveira 
Águas de São Pedro, SP 


Caro Marcelo, 

Para aquisição do livro Entendendo a 
ROM do TK-2000, basta escrever para 
Caixa Postal 54096 enviando um cheque 
nominal à Microdigital Eletrônica/Divisão 
MIcrohobby, no valor de Cz$ 75,00. 

Os livros que gostaria de adquirir, você 
poderá procurá-los na Livraria LITEC em 
São Paulo. Basta procurar o anúncio na re¬ 
vista. 


Caros Senhores, 

Sou assinante da Revista MICRO- 
HOBBY à qual considero de excelentes 
qualidades técnicas e editoriais. 

Gostei muito do curso de Assembler 
para o micro TK-90X iniciado em abril. 
Outra coisa que me interessa muito é 


um artigo sobre a light-pen para o TK- 
90X pois pretendo adquirir uma assim 
que chegar às lojas. 

Sotero Luiz da Silva 
Santos, SP 


Caro Sotero, 

Agradecemos os elogios destinados à 
nossa equipe, ficamos muito gratos em 
saber que nosso trabalho está atendendo 
às necessidades de nossos leitores. 

Na edição 34, sairá um artigo falando 
sobre a light-pen, quejá está disponível no 
mercado, explicando seu uso e quais as 
suas utilidades. Aguarde! 


Caros Senhores, 

Gostaria de saber se o programa Man¬ 
são de Sherlock Holmes da MICRO¬ 
HOBBY 26, página 45, roda no TK-2000 
II. 

Eu digitei o programa todo, quando 
fui rodar nada aconteceu e ao listá-lo, vi 
que só ía até a linha 1300. Porque isto 
aconteceu? 

Edison Pires 

São Paulo, SP 

Caro Edison, 

O programa Mansão de Sherlock Hol¬ 
mes desenvolvido para o Apple pode ro¬ 
dar no TK-2000 II, claro que há necessida¬ 
de de se fazer algumas modificações. 

Quanto ao fato de você ter digitado o 
programa e este não rodou e, na hora da 
listagem, só apareceu até a linha 1300 por¬ 
que o programa é muito extenso. A primei- 
ra página de vídeo ficou lotada e o restante 
invadiu a segunda página. Como você não 
uniu a segunda com a primeira, através do 
comando MP, a outra parte do programa 
foi perdida. 

No Apple também existe estas duas pá- 
ginas de vídeo mas elas já estão unidas 


formando uma só. Observe no Manual 
Técnico do TK-2000, página 115 e veja o 
Mapa da Memória. 

Para conseguir a gravação de informa¬ 
ções alfanuméricas é necessário usar de¬ 
terminados macetes que foram editados 
na MICROHOBBY 23 com o título “ROTI¬ 
NA DE GRAVAÇÃO DE DADOS ALFANU¬ 
MÉRICOS”. 

Além disso, temos publicado, periodi¬ 
camente na MICROHOBBY, resenhas so¬ 
bre os softwares para os diversos equipa¬ 
mentos. 

Quanto a livros que detalhem este as¬ 
sunto devem ser procurados na livraria LI¬ 
TEC, onde podem ser encontradas litera¬ 
turas técnicas de todos os tipos. O ende¬ 
reço é Rua dos Timbiras 257, CEP 01208 
São Paulo SP / Caixa Postal 30869, telefo¬ 
ne: (011)222-0477. Vendas pelo reembolso 
postal VARIG, solicite catálogo de seu in-. 
teresse. 


Prezados Senhores, 

Possuo um TK-2000 Color 128K e sou 
assinante da revista. Toda matéria que 
tem saído e que é compatível com o meu 
micro dou uma atenção especial. 

No entanto, até agora não fui feliz 
com os programas que tratam de cria¬ 
ção e manipulação de arquivos com fita. 
As literaturas e programas que consigo 
na praça quase todas são para discos. 

Portanto, caso os senhores tenham 
bons livros ou bons programas para me 
ajudar a entender “arquivo em fita”, eu 
ficaria muito grato com as indicações. 

Tulio Metzkeir 

Belo Horizonte, MG 


Caro Tulio, 

A utilização de fita no TK-2000 para ar¬ 
mazenamento de dados oferece algumas 
desvantagens, tais como: organização e 
acesso seqüêncial e armazenamento so¬ 
mente de dados numéricos. 


Venda • Compra • Troca • Consignação 
Novos • Usados 


TK- 90 X TK 20001 nmOEi 

Os melhores equipannentos pelos melhores preços 

CPUs, impressoras, periféricos em geral, todos com garantia 


Rua Ministro Godoy, 283/291 • Perdizes - São Paulo Fones: (011) 262-4255 e 263-0039. 



U Cursos 

Basic le II Dbase II 


Wordstar Appieworks 


Venham conhecer nossas nevas 
instalações e equipamentos 


Fone(011) 872-3019 
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MICROHOBBY 


CARTAS 


Os dois comandos oferecidos pelo 
equipamento são: 

- STORE - para a gravação; 

- RECALL - para leitura. 

O armazenamento é feito através de 
matrizes, que devem ser dimensionadas 
igualmente na gravação e na leitura, 
(ativa PRINTER) e CALL 1305 (desativa 
PRINTER) usamos a impressora. 

No TK-2000 usa-se o INVERSE e NOR¬ 
MAL para substituir FLASH e, o IN, utiliza- 
se um CALL correspondente para 
substituí-lo. 

Se o FLASH for retirado, o programa 
funcionará normalmente, apenas a infor¬ 
mação desejada não piscará na tela, já o 
IN poderá causar uma parada no progra¬ 
ma. 


Prezados Senhores, 

Solicito que me respondam estas pe¬ 
quenas dúdivas: 

1. o comando PR que combinado 
com os números 0e1 acionam e des¬ 
ligam a impressora, é compatível com 
o computador TK-2000? Se nào, qual 
outro comando o substiui? 

2. que outros comandos do TK-2000 
substituem os comandos FLASH e 
IN , no computador Apple II Plus ? 

3. para que servem os comandos que eu 
especifiquei anteriormente. Diga-me 
o que eles fazem. Se eu retirar estes 
comandos de um programa, o mesmo 
rodará normalmente? 

Grinaldo Lopes de Oliveira 
Salvador, BA 


Caro Grinaldo, 

Devido ao Apple apresentar slots que 
permitem a conexão de vários periféricos, 
entre eles a placa PRINTER, pode-se acio¬ 
nar diretamente a impressora usando os 
comandos PR 1 e PR 0. 

Como 0 TK-2000 não apresenta slots, 
então é necessário primeiramente carre¬ 
gar 0 software de impressora e então, atra¬ 
vés dos comandos CALL 1302(ativa PRIN- 
TER) e CALL 1305 (desativa PRINTER) 
usarmos a impressora. 

No TK-2000 usa-se o INVERSE e NCR- 
MAL para substituir FLASH e, o IN, utiliza- 
se um CALL correspondente para substi¬ 
tuí-lo. 

Se 0 FLASH for retirado, o programa 
funcionará normalmente, apenas a infor¬ 
mação desejada não piscará na tela, já o 
IN poderá causar uma parada no progra¬ 
ma. 
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Prezados Senhores, 

Faz tempo que desejava enviar algu¬ 
mas idéias que poderiam ser de interes¬ 
se para a revista e seus leitores. Deseja¬ 
ria também colocar alguns tópicos rela¬ 
cionados com o TK-2000. 

Uma observação: a revista MICRO¬ 
HOBBY em mais alguns números, irá fa¬ 
zer três anos. De fato, o material que ela 
tem publicado é farto, variado, e útil. Po¬ 
deria ser aproveitado o número 36 para 
editar um índice temático, no estilo das 
revistas científicas, classificando os ar¬ 
tigos dos números 1 a 36. 

Gostaria de saber se existe um Editor 
de Texto (não simplesmente de linhas) 
para o TK-2000, e quem o fornece. Se a 
resposta for negativa, não estaria na ho¬ 
ra de alguma empresa assumir o desa¬ 
fio ? Pode ser dito que o TK-2000 carece 
de minúsculas, mas isto é aparente (só) 
no caso de querer imprimir um texto via 
impressora; o código ASCII para minús¬ 
culas é exatamente kquele das maiús- 
culas, somando 32 (por exemplo, 
ASC(A) = 65, e ASC(a) = 97...). 

Existem jogos e aplicativos em fita 
para o TK-2000. Não existem também 
em disco? Se a resposta for negativa, 
não seria interessante que as produto¬ 
ras de software editem tanto em fitas 
como em disco? 

No caso do TK-3000, ele é compatível 
com aplicativos como o Magic Window, 
admitidos pelos Apple? 

E por fim, desejaria pedir a maior: Ne¬ 
gócios são negócios, tudo bem; mas o 
TK-2000 é uma opção linda demais fren¬ 
te aos Apple, como podemos abandoná- 
la... 

Um abraço (simbólico), e meus para¬ 
béns pela sua excelente revista. 

Juan Carlos Ceballos 

Campina Grande, PB 


Caro Juan, 

Ficamos profundamente agradecidos, 
pefo fato de lembrar que a MICRCHCBBY 
em breve irá completar três anos de exis¬ 
tência. 

Até 0 momento a Microdigital não de¬ 
senvolveu nenhum Editor de Texto para o 
TK-2000 apenas o editor de linhas, talvez 
exista no mercado, mas não temos certe¬ 
za. 

A possibilidade de se obter minúsculas 
no TK-2000, é através de um programa pu¬ 
blicado na edição 26, página 14. 

Existe no mercado uma grande varieda¬ 


de de jogos e aplicativos para o TK-2000 
tanto desenvolvidos pela Microdigital co¬ 
mo por outras empresas de software. 

C Magic Window é compatível com o 
TK-3000. Neste equipamento, ele funcio¬ 
na perfeitamente. 

Respondendo a sua última indagação: 
já existem vários programas sendo co¬ 
mercializado em disco para o TK-2000. 


Prezados Senhores, 

Tenho duas dúvidas: 

É possível, via software, criar novas 
cores no TK-2000, já que são tão poucas 
as cores que ele possui ou apenas via 
hardware. Pergunto, porque outros com¬ 
putadores que possuem o mesmo mi¬ 
croprocessador, o 6502, têm várias co¬ 
res? 

Há possibilidade de colocarmos a ro¬ 
tina do TK DOS 3.3 do TK-2000 acima da 
MP, ou seja, em cima da ROM, com o in¬ 
tuito de liberar mais memória RAM a ser 
gravada em disco, pois há vários progra¬ 
mas em fita que não consigo passá-ios 
para disco. 

Hernando Cipriano da Silva 

Rio de Janeiro, RJ 


Caro Hernando, 

Aguarde a edição 34, onde será publica¬ 
do um artigo sobre como utilizar os 64K 
do seu TK-2000. 

O TK-2000 foi desenvolvido para traba¬ 
lhar com seis cores no modo de alta-reso¬ 
lução, incluindo o preto e o branco. Mas, 
através de um processo DITHERING (exci¬ 
tação) é possível produzir, artificialmente, 
onde este número pode ser aumentado 
consideravelmente. Esta informação en¬ 
contra-se no Manual Técnico, páginas 65 e 
66 . 

Existem no mercado nacional vários 
micros que possuem o mesmo micropro¬ 
cessador, mas estes diferem quanto à sua 
configuração interna que varia de um fa¬ 
bricante para o outro. 

O TK-2000 foi desenvolvido para traba¬ 
lhar com sete cores tanto em baixa como 
em alta-resolução. Não havendo a possibi¬ 
lidade de misturar as cores. 

O Apple possui 0 dobro de cores que o 
TK-2000, porque é possível fazer combina¬ 
ções entre elas o que aumenta em dobro 
sua capacidade de cores em baixa e alta- 
resolução. 




MICROHOBBY 


CLUBi DE USUÁRIOS 


Experiônclas e 
Recados 

r ^ 


o nosso clube é muito novo, tivemos a 
idéia justamente lendo a MICROHOBBY. 
Infelizmente ainda não temos muitos só¬ 
cios pois nosso nome foi publicado recen¬ 
temente. 

Até agora, por intermédio desta revista, 
recebemos inúmeras cartas. 

A nossa idéia foi a seguinte: reti ramos o 
nome de alguns clubes de usuários dessa 
revista, e mandamos cartas convidando- 
os para participar do nosso clube. Muitos 
deles aceitaram. Por isso, se possível, 
gostaria que me enviassem, por obséquio, 
mais alguns nomes de clubes de usuá¬ 
rios. 

Estamos trocando programas. Como 
vocês já devem saber, nós enviamos um 
jornalzinho para os sócios. Nele, envia- 
mo.s uma série de dicas, programas etc. 
Inclusive, todos os sócios nos mandam 
programas, enfim, coisas do nosso inte¬ 
resse. 

A parte mais importante da MICRO¬ 
HOBBY, na minha opinião, é justamente, 
O Clube de Usuário. É nele que todos se 
unem e comentam o conteúdo da Revista. 

Se vocês quiserem poderemos sempre 
que puder, lhe enviar um relatório sobre as 
atividades realizadas no SOFTCLUB. 

Softclub 

R. Pascoal Ranieri Mazzilli, 634 - V. Indus¬ 
trial 

03257-São Paulo, SP 


V_y 
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Caros Sidnei e Marcelo, 

Obrigado pelo seu recado aos nossos 
sócios. Gostaríamos que dessem uma 
atençào especial na reportagem da edi¬ 
ção 33 sobre as finalidades de nosso 
clube de usuários. 

Estamos muito interessados em re¬ 
ceber um relatório contendo informa¬ 
ções sobre as suas atividades, pois com 
isso poderemos publicá-las em nossa 
revista, como informação aos nossos 
sócios. 


V _/ 
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Desejo receber informações sobre li¬ 
vros e grupos de usuários do Espírito San¬ 
to. Se possível, em Cachoei ro de Itapemi- 
rim ou nas cidades vizinhas. 

AlcirCesar da Silva 

R. Manoel D. Monteiro, 13 - Nova Brasília 
29300 - Cachoei ro de Itapemirim, ES 

Caro Alcir, 

O seu recado está dado. Espero que 
receba muitas cartas. 


\ _/ 

\ 

Ana Lúcia, estou enviando-Íhe esta car¬ 
ta, para que você me dê alguma sugestão 
para trocar programas pqr correspondên¬ 
cia, pois é difícil mandar fitas, além de ar¬ 
riscado. 

André Dastre Vilas Boas 
R. Machado de Assis, 16/33 
17043-Bauru, SP 

Caro André, 

Quando um usuário deseja trocar pro¬ 
gramas com outros, nós deixamos que 
este realize seu objetivo da melhor ma¬ 
neira possível. 

Concordo que seja arriscado mandar 
fitas peio correio porque corre-se o risco 
destas extraviarem. Mas o nosso servi¬ 
ço de correio melhorou muito, e tenho 
certeza que você terá sucesso nas suas 
correspondências. 

Tente se comunicar com algum usuá¬ 
rio que já tenha feito este tipo de transa¬ 
ção para obter maiores explicações de 
como mandar programas por correspon¬ 
dência. Aqui está dado o recado aos ou¬ 
tros usuários para que orientem o An¬ 
dré. 

L___y 
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Aproveitando a oportunidade, gostaria 
que vocês colocassem um aviso para o 
Klaus, de São Paulo, dizendo que eu quero 
trocar programas com ele, mas que man¬ 
de uma outra carta porque eu perdi o en¬ 
dereço dele. 

Carlos Henrique Tavares Mero 
R. Antonio Procópio, 716 - Farol 
57000 - Maceió, SP 

V___y 


C.U. 002 


NOVOS SÓCIOS 

TK 85 E COMPATÍVEIS 

Aldo Jorge Nakamura 
Av. Paulista, 854 -12.° andar 
01310-São Paulo, SP 
(também possui um Apple) 

Area de interesse; gráficos e aplicativos. 

Cyro Alexandre C. de Leone 
Rua Manaus, 38/112 - Água Fria 
02335-São Paulo, SP 
(também possui um TK-2000) 

Área de interesse: geral. 

Yuri Alexei Cairof Sampaio 

Rua Paulino da Silva Lavandeira, 204 

17500-Marília, SP 

Área de interesse: jogos, educativos, 
programas. 

Gilson Pereira 
Rua Duque de Caxias, 188 
96200 - Rio Grande - RS 
(também possui um TK-90X) 

Área de interesse: organiza um clube 
de usuários em sua cidade. 

TK 90X E COMPATÍVEIS 

Fernando Keiji Yoshimo 

Rua Cantarricos, 83 - Imirim 

02540-São Paulo, SP 

Área de interesse: jogos, assembler, 

dicas de eletrônicas, aplicativos. 

Marcelo Dionisio Penalva 
Av. 64, n.° 2493 - J. Panorama 
13500 - Rio Claro, SP 
Trabalha com TK, Apple, TRS-80 

Daniel Israel Mignone 

Rua Gomes Carneiro, S11/104 - Ipanema 

22071 - Rio de Janeiro, RJ 

(também possui TK-85 e TK-2000) 

Edson Yuichi Suzuki 

Rua Agostinho Paporalli, 1116 - V. Oliveira 

08700 - Mogi das Cruzes - SP 

Área de interesse: assembly, educação 

TK 2000 E COMPATÍVEIS 

Carlos Henrique Tavares Mero 
Rua Antonio Procópio, 716 - Farol 
5700 - Maceió, AL 
Área de interesse: jogos, música, 
gráficos, aplicativos 

Fritz S. Arnold 

Rua Dr. Paulo Duarte, 11 - Pirituba 
05165-São Paulo, SP 
(também possui um TK-85) 

Area de interesse: aplicativos, hardware, 
jogos, LM 

Guilherme Lopes 

Travessa Narcejo, 138 - Lins 

20710 - Rio de Janeiro, RJ 

Área interesse: engenharia, arquitetura, 

desenho técnico, jogos 

APPLE E COMPATÍVEIS 

Eduardo Marchiori 
Rua Mariano Procópio, 58 
01548-São Paulo, SP 

Aldo Jorge Nakamura 
Av. Paulista, 854 -12° and. 

01310-São Paulo, SP 
(também possui um TK-85) 

Área de interesse: gráficos, aplicativos 

Guilherme João Muller 
Rua Canadá, 213 
80000 - Curitiba, PR 
(também possui um TK-2000) 

Área interesse: linguagem de máquina 
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Informática: um 
instrumento de 
desenvolvimento. 


Informática, 

desenvolvimento, cidade 
maravilhosa e tecnologia. 
Estes são os temperos 
básicos da VI Feira e do 
XIX Congresso de Informática 
deste ano. Preocupados em 
discutir os rumos da 
informática no Brasii, 
apresentar a consolidação do 
setor e a opção da nossa 
indústria pelo mercado 
voltado a aplicações 
profissionais, os seus 
organizadores abrirão as 
portas do Riocentro cercados 
de enorme expectativa em 
torno do sucesso do maior 
Evento de informática no 
País. 


Ana Lúcia de Alcântara 


M ostrar em que medida a informáti¬ 
ca está contribuindo para o de¬ 
senvolvimento do País nos diver¬ 
sos segmentos da economia é um dos 
principais objetivos dos organizadores da 
VI Feira Internacional e do XIX Congresso 
Nacional de Informática que serão realiza¬ 
dos, em paralelo, nos dias 18 a23 de agos¬ 
to, na cidade do Rio de Janeiro. 

O maior evento da área de informática 
no Brasil, considerado um dos quatro 
mais importantes no setor em todo o mun¬ 
do, tem este ano um tema que segue a 
mesma linha da temática do Informática 
do ano passado - realizado em São Paulo. 
Informática, um instrumento de desen¬ 
volvimento dá continuidade ao Informáti¬ 
ca, Progresso e Desenvolvimento tra¬ 
zendo os resultados alcançados na área, 
nos setores científico-tecnológico, eco¬ 
nômico e político, após um ano da Nova 
República. 

Enquanto o lnformática/85 pretendia 
discutir, em seu Congresso, os aspectos 

8 



políticos que envolviam o setor, até então, 
como Legislação de Software, Registros 
das profissões ligados ao Processamento 
de Dados e Avaliação dos resultados obti¬ 
dos no primeiro ano da Lei de Informática, 
0 lnformática/86 quer apresentar ao públi¬ 
co a consolidação do setor, os índices de 
desenvolvimento alcançados por outros, a 
posição dos usuários na Constituinte e 
principalmente, “mais aplicações da tec¬ 
nologia nos diversos setores da economia 
e muito menos discussões acadêmicas”. 

Este novo posicionamento se deve, se¬ 
gundo os organizadores do Evento, aos re¬ 
sultados obtidos na pesquisa realizada 
pela SUCESU - Sociedade dos Usuários 
de Computadores e Equipamentos Subsi¬ 
diários do Rio de Janeiro, junto aos partici¬ 
pantes do lnformática/85 que “permitiram 
conhecer toda a tendência de interesses, 
principalmente dos congressistas”. Esta 
tendência leva à preferência das aplica¬ 
ções que se dividem ém diversos segmen¬ 
tos: banco de dados, desenvolvimento, 
implantação e manutenção de sistemas, 
administração de informática, entre ou¬ 
tros. 

A preocupação com a opinião dos parti¬ 
cipantes neste Evento trouxe, além de al¬ 
terações temáticas no Congresso, algu¬ 
mas inovações também na Feira. Este 
ano, a VI F.l.l. conta pela primeira vez, com 
a formação do Conselho de Expositores, 
integrado por todos os segmentos pre¬ 
sentes e que visa, principalmente, elimi¬ 
nar problemas de ordem operacional que, 
em realizações anteriores, devido à locali¬ 
zação e estruturação do Riocentro, trouxe¬ 
ram alguns prejuízos aos expositores e 
participantes do Congresso. 

O Evento contará também com o apoio 
do Governo do estado que o vem conside¬ 
rando “prioridade máxima dentro da linha 
adotada pela sua administração em forne¬ 
cer apoio irrestrito ao setor de informática 
na região”. Para isto, o Governo do Rio de 
Janeiro destinou recursos que chegam a 
Cz$ 5 milhões para a realização de obras 
no Riocentro que visam à melhoria e sina¬ 
lização das vias de acesso ao local. 


A Feira 

Ocupando uma área de 25.CXX) m^, a VI 
Feira Internacional de Informática contará 
com a presença - de acordo com dados di¬ 
vulgados pela Foco - Feiras, Exposições e 
Congressos Ltda.(empresaorganizadora)- 
de aproximadamente 300 mil pessoas e 



com cerca de 300 expositores nacionais e 
internacionais, que estarão distribuídos 
nos diversos setores da exposição. Equi¬ 
pamentos e serviços de informática, mídia 
eletrônica, telemática, automação bancá¬ 
ria e de escritório, serviços e equipamen¬ 
tos de computação, periféricos e compo¬ 
nentes de eletrônica digital, telecomuni¬ 
cações, microfilmagem, móveis, equipa¬ 
mentos e artigos para escritório e pesqui¬ 
sa e desenvolvi mento são as diversas atra¬ 
ções desta Feira. 

Porém dois setores em especial rece¬ 
berão benefícios importantes na Exposi¬ 
ção de agosto. O primeiro setor é o de pe¬ 
quenas e microempresas, que terão in¬ 
centivos financeiros para participarem da 
Feira, através de um projeto especial cria¬ 
do pela Foco e pela Sucesu, subsidiado 
pelo Banerj - Banco do Estado do Rio de 
Janeiro e pela Flupeme. Dessa forma, foi 
criada uma área específica para software, 
agregada por software básico, de apoio e 
aplicativo que é tormada por boxes/bal- 
ções já montados, em lugar dos caríssi¬ 
mos estandes. Espera-se segundo a Foco, 
a participação de cerca de 50 microempre¬ 
sas. Haverá também, além do Banerj, o 
Banco de Desenvolvimento do Rio de Ja¬ 
neiro que apresentará o seu Projeto Pró- 
Info de benefícios (com financiamentos 
de 150 mil OTNs, juros de 6% ao ano e pra¬ 
zos de até oito anos) aos micros, peque¬ 
nos e médios empresários. 

O outro setor é o de Pesquisa e Desen¬ 
volvimento, que teve a sua área ampliada 
dos 1500 do ano passado para os dois mil 
deste ano, assim como o aumento do nú¬ 
mero de instituições e centros de pesqui¬ 
sas participantes (de 25 para 40), que pre¬ 
tendem mostrar não só o que fazem em 
P&D, mas 0 que a informática está fazen¬ 
do pela pesquisa e desenvolvimento em 
outros campos de alta tecnologia como a 
agricultura, biotecnologia, energia, socio¬ 
logia, medicina, etc. Esta área já tem con¬ 
firmadas a presença de 32 instituições e 
trará das universidades aproximadamente 
300 pessoas, além de pequenas empresas 
que trabalham com tecnologia emergen¬ 
te envolvendo um orçamento estimado 
em Cz$ 3.500.000,00. 

A Feira trará com certeza, vários lança¬ 
mentos e a tendência dos lançamentos, 
segundo muitos prevêem, se centrará no 
campo dos 16 bits, que buscarão atingir o 
interesse do público mais especializado. 

O Congresso 

Fazer um Congresso de Informática 
muito mais pragmático que teórico é o ob¬ 
jetivo da SUCESU/RJ para este ano. Com 
este intuito, os organizadores deste XIX 
Congresso apresentarão diversas pales- 
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tras técnicas voltadas aos profissionais 
que falarão de trabalhos nas áreas de con¬ 
trole de processos, automação industrial, 
comercial e de serviços, apoio à decisão, 
entre outros. Ao todo foram selecionados 
90 trabalhos que têm temas como “For¬ 
mação e Aperfeiçoamento de Recursos 
Humanos em Informática”; Teleinformáti¬ 
ca: Inteligência Artificial e Robótica etc. 

O Telecongresso, que foi uma das prin¬ 
cipais atrações do Congresso realizado 
em São Paulo, em 85, será mantido este 
ano e trará debates que discutirão, entre 
outros assuntos, a proteção do consumi¬ 
dor de informática (o usuário): informação. 
Informática e a constituição; os modelos 
de desenvolvimento da informática e a no¬ 
va ordem econômica e informática. 

Um dos destaques neste Congresso 
será, com certeza, a programação espe¬ 
cial dedicada à área de microinformática. 
Este espaço foi criado, de acordo com os 
organizadores, devido às características 
próprias deste setòr, pois sentiu-se a ne¬ 
cessidade de compatibilizar o Microinfo 
às expectativas do seu público alvo (bas¬ 
tante heterogêneo): os usuários de micro¬ 
computadores. 

Para atender este público heterogêneo 
elaborou-se uma programação formada 
de palestras sobre as diversas famílias e li¬ 
nhas de equipamentos existentes e a res¬ 
peito do software e aplicações do micro, 
apresentando uma visão conceituai das 
principais aplicações e a descrição dos 
pacotes disponíveis para os diversos equi¬ 
pamentos. 

Haverá ainda no Microinfo ouXxos even¬ 
tos que contarão com a presença de con¬ 
vidados do Exterior. Entre estes, destaca- 
se a palestra sobre “Microinformática - 
presente e futuro”. 


Telex 


A lmarés, empresa especializada na 
revenda de produtos de informática 
na cidade de São Paulo, estará am¬ 
pliando sua área de atuação. Com nova di¬ 
reção técnica, ocupada por Marcelo 
Leon de Oliveira, um jovem executivo de 
30anos com currículo extenso e formação 
especializada na área de eletrônica, a Ima- 
rés passará a incrementar a sua recém- 
fundada Divisão de Desenvolvimento de 
Projetos Especiais, que exigiu da Empre¬ 
sa um investimento de Cz$ 800 mil distri¬ 
buídos entre pesquisa, aquisição de equi¬ 
pamentos e contratação de pessoal espe¬ 
cializado. 



O Controiador Lógico Programável doado ao SENAI, pela Metal Leve 


Mais um incentivo 
ao Projeto do 
SENAI 

O Projeto de Informática do Senai - 
Serviço Nacional de Informática, 
cuja maior atuação tem sido nota¬ 
da na regional de São Paulo, recebeu mais 
um incentivo para sua-consolidação, du¬ 
rante 0 último mês de julho. A entidade re¬ 
cebeu, como doação, um equipamento no 
valor de Cz$ 600 mil da Metal Leve, que se¬ 
rá utilizado na Escola Senai “Antonio Nos- 
chese”, da cidade de Santos. 


O equipamento, um Controlador Lógi¬ 
co Programável (CLP), acompanhado de 
painel simulador e terminal de programa¬ 
ção, será utilizado no Laboratório de Con¬ 
troladores Lógicos da Escola de Santos, 
um dos quatro laboratórios onde se de¬ 
senvolvem o treinamento de especializa¬ 
ção em circuitos digitais e microcomputa¬ 
dores, destinado a técnicos de nível mé¬ 
dio e superior, de empresas usuárias de 
sistemas digitais para controle de proces¬ 
sos, filiadas à Entidade. 

O Projeto de Informática do Senai foi 
iniciado em 84 e o laboratório de circuitos 
digitais e microcomputadores Inaugurado 
no ano passado. A.L.A. ^ 


Pacotes 

específicos para 
PC e Apple 

A Compusoft, empresa paulista es¬ 
pecializada no desenvolvimento de 
sistemas e atuando desde 83 neste 
setor, está colocando no mercado, através 
da rede de comercialização da Compus- 
hop (São Paulo - Capital, Bauru e Ribeirão 
Preto), um pacote de programas com apli¬ 
cações específicas, desenvolvidos inicial¬ 
mente, para alguns de seus clientes. 

Administração Escolar, Controle de 
Distribuidora de Títulos e Valores Imobi¬ 
liários, Clube de Investimentos, Controle 
de Convênios Médicos, Fluxo de Caixa e 
outros sistemas administrativos são al¬ 
guns dos programas que fazem parte des¬ 
te pacote. 

Todos os programas daCompusoft são 
desenvolvidos em dois sistemas opera¬ 


cionais básicos (CP/M e MSDOS) e se 
apresentam, segundo Luis Branco, geren¬ 
te geral da Empresa, para o usuário de 
uma maneira “bastante amigável”, pois 
são estruturados em menus que forne¬ 
cem a este,toda a informação necessária, 
com leitura de tela facilitando dessa for¬ 
ma, o entendimento de programa e o tra¬ 
balho do mesmo. 

Os softwares desenvolvidos inicial- 
mente para clientes específicos, têm tido, 
conforme ressaltou Branco, uma procura 
bastante acentuada por parte dos usuá¬ 
rios, pessoas físicas. “Um destes produ¬ 
tos” - exemplificou, “é o de Valores Mobi¬ 
liários e 0 Clube de Investimentos”. 

A Compusoft tem atuado também, na 
área de treinamento voltado à microinfor¬ 
mática para profissionais e iniciantes em 
computação, assim como fornecendo 
cursos fechados às empresas e na área de 
consultoria, fornecendo aos clientes, ser¬ 
viços especializados como a conversão 
de arquivos AppIe-PC e projetos de siste¬ 
mas multiusuário. A.L.A. <Cy 
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Muitos produtos 
e poucas 
novidades 

C om a aproximação da VI Feira Inter¬ 
nacional de Informática, á III Expo 
Soft não mostrou muitas novida¬ 
des em matéria de lançamentos. 

Realizada entre os dias 25 e 27 de junho, 
no Centro de Convenções Rebouças (em 
São Paulo), a III Exposição Nacional de 
Software e Serviços de Informática reuniu 
37 expositores que apresentaram softwa¬ 
res nacionais e estrangeiros, além de su¬ 
primentos e serviços para computação. 

Promovida pela terceira vez pela Com- 
pucenter e Computer World, apesar de 


poucos lançamentos, os visitantes tive¬ 
ram a oportunidade de tomar contato com 
as principais Empresas de software. 

Entre elas,^ própria Compucenter que 
selecionou para esta Feira boas opções 
como os gerenciadores de projetos Pro- 
ject e Superproject; o Appieworks (progra¬ 
ma integrado composto de planilha, editor 
de texto e Banco de Dados, para a linha 
Apple lle) etc. 

Os usuários viram ainda: o processador 
de texto Multimate da Datalogica; o Clip¬ 
per (compilador do dBase III) da Officer; e 
o gerenciador de Banco de Dados relacio¬ 
nal ZIM da Matrix. 

A Cincom Systems também esteve pre¬ 
sente neste evento, demonstrando os se¬ 
guintes softwares; Mantis (linguagem de 
4.® geração para desenvolvimento de apli¬ 
cações "on-line”); Net/Master (sistema de 
gerenciamento de Rede); PC Contact para 


conexão micro-mainframe etc. 

Em paralelo à Feira foi organizado um 
ciclo de 12 palestras sobre os seguintes 
temas: "Estado da Arte na Linguagem de 
4.® Geração”, "Software para Ligação Mi- 
cro-Mãinframe”, "Sistemas Gerenciado¬ 
res de Banco de Dados Relacionais”, "In¬ 
teligência Artificial e Expert Systems”, e 
outros. 

De acordo com o balanço feito pelo di¬ 
retor da Compucenter, Elias Silmar El- 
Beck, 60% dos softwares apresentados 
na III Expo Soft foram estrangeiros e apro¬ 
ximadamente dez mil pessoas compare¬ 
ceram ào evento, ultrapassando assim, as 
expectativas. Segundo ele, isto está rela¬ 
cionado ao crescimento do mercado bra¬ 
sileiro de software, que no ano passado 
movimentou US$ 15 milhões e a previsão 
para 1986 é de US$ 30 milhões. M.R. 

o 


o Vale do Silício 
do Brasil 

E stá nascendo, no Brasil, a primeira 
iniciativa conjunta entre universida¬ 
de, governo e empresários, para a 
instalação do primeiro Pólo de desenvolvi¬ 
mento de Alta Tecnologia no País. 

A criação da C/afec-Companhia de De¬ 
senvolvimento do PólodeAltaTecnologia 
em Campinas, cidade do interior de São 
Paulo, lançada oficialmente pelo Presi¬ 
dente José Sarney, em julho passado, ins¬ 
pirou-se em idênticas experiências reali¬ 
zadas em outros países, como Estados 


Unidos (Vale do Silício), França (Grnoble), 
Japão (Tsukuba) e Reino Unido (Science 
Parks). 

O plano para a criação de um Pólo in¬ 
dustrial gerador de alta tecnologia, princi¬ 
palmente na área de informática, surgiu na 
década de 70, quando um grupo de pes¬ 
quisadores da Unicaimp (Universidade de 
Campinas) começou á discutir a implanta¬ 
ção na região, de centros avançados de 
pesquisa. E já no final da década de 70, as 
discussões se transformaram em um Pro¬ 
jeto que contou com o apoio da Prefeitura 
deCampinas, da Telebrás, do CPFL (Com¬ 
panhia Paulista de Força e Luz) e do CTI 
(Centro Tecnológico de Informática). 

A Ciatec permitirá a implantação das 
indústrias numa área delimitada de 248 
mil metros localizada ao lado do CTI, além 


de garantirás mesmas, incentivos fiscais- 
aprovados pela Prefeitura - como isenção 
de ISS e IPTU, durante cinco anos. Além 
disso, o Badesp (Banco de Desenvolvi¬ 
mento doí stado de São Paulo) promove¬ 
rá planos de financiamentos às empresas 
que ali se instalarem, com prazos médios 
de amortização de 12 anos, dois anos de 
carência, entre outras vantagens. 

A escolha de Campinas para a implan¬ 
tação do Pólo Industrial de Tecnologia na 
área de informática, se deu porquejá exis¬ 
tem na região, centros avançados de pes¬ 
quisas como o CTI, a PUCC (PUC Campi¬ 
nas), o CPqD e a própria Unicamp e que 
irão manter convênios com a Ciatec e as 
indústrias, trocando conhecimentos tec¬ 
nológicos e científicos. A.LA. 

O 


Calendário do 
mês 

15/08 - Informática para dirigentes: 
Conceitos e Estratégias - São Paulo - SCI 
(Sistemas, Computação e Informática)- 
Tel.: (011)289-0099. 

18/08 - Linguagem BASIC sob CP/M - 
Rio de Janeiro - Instituto de Tecnologia 
ORT-(021) 226-3192. 

De 18 a 19/08 - DOS - Sistema Opera¬ 
cional parà Microcomputadores 16 Bits- 
Belo Florizonte - BMS (Belgo Mineira Sis¬ 
temas) - Tel.: (031) 226-6644. 

De 18 a 24/08 ■ lnformática/86 - VI Fei¬ 
ra Internacional de Informática - Rio de 
Janeiro - SUCESU. 
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De 18 a 26/08 - Wordstar - Belo Flori¬ 
zonte - BMS (Belgo Mineira Sistemas) - 
Tel.; (031) 226-6644. 

De 20 a 22/08 - Programando em dBa¬ 
se III - São Paulo - SPCI (São Paulo Com¬ 
puter Institute) - Tel.: (011) 883-0355. 

De 20 a 22/08 - Lotus 7-2-3 - Belo Flori¬ 
zonte - BMS (Belgo Mineira Sistemas) - 
Tel.; (031) 226-6644. 

De 20 a 22/08 - Automação de escritó¬ 
rios, origem, evolução e perspectivas - 
IBPI (Instituto Brasileiro de Pesquisa em 
Informática) - Rio de Janeiro - Tel.: (021) 
286-6891. 

De 21 a 22/08 - Sistemas de Supervi¬ 
são e Controle Computadorizado de 
Energia - São Paulo - ABACE (Associação 
Brasileira de Administração e Conserva¬ 
ção de Energia) - Tel.: (011) 287-2627/283- 
2967. 


25/08 - MS-DOS Básico - São Paulo - 
Servimec - Tel.: (011) 222-1511. 

De 25 a 26/08 - Centro de Informa¬ 
ções, Implantação e Operação - Rio de 
Janeiro - IBPI (Instituto Brasileiro de Pes¬ 
quisa em Informática)-Tel.: (021)286-6891. 

De 25 a 27/08 - Lotus 1-2-3: Conceitos 
Básicos - Access Information Systems - 
São Paulo - Tel.: (011) 530-1031. 

De 25 a 27/08 - Wordstar - São Paulo - 
Servimec-Tel.; (011)222-1511. 

De 25 a 27/08 - Programando em dBa¬ 
se II - São Paulo - SPCI (São Paulo Compu¬ 
ter Institute) - Tel.: (011) 883-0355. 

De 25 a 29/08 - Aplicativos para o Mi¬ 
crocomputador- Porto Alegre - Inteligên¬ 
cia Treinamento em Informática - Tel.: 
(0512) 26-1988. 

[> 
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De 25 a 29/08 • Análise e Projeto Estru¬ 
turado para Sistemas On-Line - Rio de J a- 
neiro - SCI (Sistemas, Computação e Infor¬ 
mática) - Tel.; (021) 294-9292. 

De 25 a 29/08 ■ Ligação Micro-Mainfra- 
me- Porto Alegre-InteligênciaTreinamen- 
to em Informática - Tel.: (0512) 26-1988. 

De 27 a 29/08 - Sistemas Distribuídos - 
Rio de Janeiro - IBPI (Instituto Brasileiro de 
Pesquisa em Informática) - Tel.: (021) 286- 
6891. 

De 27 a 29/08 - Os microcomputado¬ 
res como Ferramentas do Centro de In¬ 
formática-R\o de Janeiro - SCI (Sistemas, 
Computação e Informática) - Tel.: (021) 
294-9292. 

De 27 a 29/08 - Fundamentos de Ban¬ 
cos de Dados - São Paulo - SCI (Sistemas, 
Computação e Informática) - Tel.: (011) 
289-0099. 

De 27 a 29/08 ■ dBase ii - São Paulo - 
Servimec - Tel.: (011) 222-1511. 

De 28 a 29/08 - Wordstar- Rio de Janei¬ 
ro - Servimec - Tel.: (021) 221-6067. 

De 28 a 29/08 - MS-DOS Básico - Rio 
de Janei ro - Servi mec - Tel.: (021) 221 -6067. 

De 01 a 08/10 - Logo para educadores 
epsicólogos - Rio de Janeiro - Instituto de 
Tecnologia ORT - Tel.: (021) 226-3192. 

De 02 a 05/09 - Banco de Dados em Mi¬ 
crocomputador- Belo Horizonte - BMS 


(Belgo Mineira Sistemas) - Tel.: (031) 226- 
6644. 

De 02 a 10/09 - Lotus 1-2-3- Belo Hori¬ 
zonte - BMS (Belgo Mineira Sistemas) - 
Tel.: (031) 226-6644. 

De 30 a 05/09 • Teleprocessamento e 
Redes de Computação - Rio de Janeiro - 
IBPI (Instituto Brasileiro de Pesquisa em 
Informática) - Tel.: (021) 286-6891. 

De 03 a 05/09 - O uso de microcompu¬ 
tador na área de Marketing e Vendas - 
São Paulo - SENAC - Tel.: (011) 256-5522. 

De 03 a 05/09 - Comunicação para Mi¬ 
crocomputadores - São Paulo - 31 Infor¬ 
mática - Tel.: (011) 521 -9509. 

De 08 a 12/09 ■ Linguagem "C"- Porto 
Alegre - Inteligência Treinamento em In¬ 
formática - Tel.: (0512) 26-1988. 

De 08 a 14/09 • Introdução ao Lotus 1- 
2-3 - São Paulo - SENAC - Tel.: (011) 256- 
5522. 

De 08 a 23/09 ■ AssemblerZ-dO- Rio de 
Janeiro - Instituto de Tecnologia ORT - 
Tel.: (021) 286-7842. 

De 08 a 30/09 - Microprocessador i - 
São Bernardo do Campo - lECAT (FEI - Fa¬ 
culdade de Engenharia Industrial) - Tel.: 
(011)419-0200. 

De 10 a 12/09 - Projeto de Circuitos de 
Alta Integração (LSI e VLSI) - Rio de Ja¬ 
neiro - IBPI (Instituto Brasileiro de Pesqui¬ 


sa em Informática) - Tel.: (021) 286-6891. 

De 15 a 19/09 - O microcomputador no 
Ensino - Porto Alegre - Inteligência Treina- 
mentoem Informática-Tel.: (0512)26-1988. 

De 15 a 24/09 - BASIC I - São Bernardo 
do Campo - lECAT (FEI - Faculdade de En¬ 
genharia Industrial) - Tel.; (011) 419-0200. 
16/09 - Introdução à Microinformática 

- Rio de janeiro - Datamicro -Tel.: (021)511 - 
0395. 

17/09 • MUMPSpara Microcomputa¬ 
dores - Rio de Janeiro - Datamicro - Tel.: 
(021)511-0395. 

De 17 a 19/09 - Sistemas Videotexto - 
São Paulo - CKL (Treinamento Empresa¬ 
rial Avançado). 

18/09 - Gerenciador de Base de Dados 

- Rio de Janeiro - Datamicro -Tel.: (021) 511 - 
0395. 

De 18 a 19/09 - O microcomputador 
como ferramenta no processo de toma¬ 
da de decisões - São Paulo - SEN AC - Tel.: 
(011)255-0066. 

De 22 a 29/09 - Processadores de Tex¬ 
tos - subsídios para escolha - São Paulo - 
SENAC - Tel.: (011) 255-0066. 

De 24 a 26/09 - Sistemas de Apoio à 
decisão - São Paulo - CKL (Treinamento 
Empresarial Avançado). 

O 


HOBBYSHOP 


VEJA SE SUA CIDADE TEM O QUE VOCÊ PRECISA Tel.: (011) 825-4066 


SÀO PAULO 


MICRO 


Service 


Interface KEMPSTOM e colocação da ROM original do 
SPECTRUM no TK 90X. Inclusão de 36 novas funções e 
Alta-Resolução para TK 85, 83 e CP 200. Manutenção 
de microcomputadores SINCLAIR (TK 90X, ZX SPEC- 
TRUM, TK 85, 83, etc.), APPLE e TRS. 

WILSON DE ASSIS - TEL: 203-7967 - Rua Fabrício Cor¬ 
reia, 145 - São Paulo - SP - CEP 02311. 


TK 90X E SPECTRUM 
SINÔNIMO DE REDE SOFTWARE 

FINALMENTE NO BRASIL UM CLUBE DE SOFTWARE QUE LIGA VO¬ 
CÊ DIRETAMENTE COM OS MELHORES JOGOS ANIMADOS E UTILI¬ 
TÁRIOS DA EUROPA. 

NA REDE, VOCÊ RECEBE SUAS FITAS COM TODA A COMODIDADE, 
PONTUALIDADE E QUALIDADE QUE ESTE CLUBE PODE LHE OFE¬ 
RECER 

INFORME-SE MELHOR ESCREVENDO PARA RICARDO ISKANDAR . 
RUA ISIDORO DIAS LOPES 189. POÁ. - SP. CEP. - 08550 OU MESMO 
LIGANDO PARA (011) 463-1690, E TENHO CERTEZA ABSOLUTA QUE 
VOCÊ FARÁ PARTE DO NOSSO CLUBE. 



appic cursos 

CURSOS DIRIGIDOS DE 
MICROCOMPUTADORES 


' BASIC I e II e Applesoft 
• ASSEMBLER 6602 

• EDITOR DE TEXTO E PLANILHA ELETRÔNICA 


NOVAS TURMAS (c/ 12 alunos) 
INÍCIO IMEDIATO 


Reservas pelos Telefones: 863-9467 — 863-2406 Rua Suzano, 78 — Jardim Paulista — Sáo Paulo 


SOFTWARE PARA TK-3000 He 


HHItl 

A ALFAMICRO coloca a sua disposição mais de 3000 progra¬ 
mas para o TK-3000 Ilee outros equipamentos compatíveis 
com a linha APPLE He “Enhanced” e Plus aos melhores pre¬ 
ços do mercado. 

Escolha seus programas entre os mais famosos títulos do mer¬ 
cado internacional e pague unicamente Cz$ 35,00 por disco. 
Possuímos também programas para CP-500e IBM-PC. 
Escreva já! E receba nosso catálogo pelo correio. 
Consulte-nos também a respeito de periféricos e acessórios já 
que podemos cobrir qualquer oferta, e atendemos todo Brasil. 
Alfamicro Informática-Cx. Postal, 12.064 • 02098 
F. 011 - 950-8998 - São Paulo SP 
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Estamos pesquisando a receptividade 
de nossas seções junto a você. Para isto 
soiicitamos que quaiifiquem-nas através 
de notas e conceitos que vão do 
Exceiente ao Péssimo. Pedimos que nos 
enviem este encarte, pois através deie 
poderemos melhorar cada vez mais a 
nossa MICROHOBBY. 

Nesta primeira experiência daremos 
uma relação apenas das seções e nas 
edições posteriores ampliaremos a 
pesquisa, passando a codificar todas as 
matérias. 

Coloque o código da nota/conceito ao 
lado de cada código da seção. Os 
códigos referentes às notas, são os 
seguintes: 


A - Para as seções que você considera 
“ Excelente ”, ou que atenda 
plenamente a sua necessidade. 

B - Para as seções que você considera 
“ Boa ”, ou que atenda apenas em 
alguns aspectos o seu interesse. 

C - Para as seções que você considera 
“ Razoável ”, ou que não atenda o 
seu interesse, mas é uma 
informação a mais. 

D - Para as seções que você considera 
“ Sem valor , ou inútil”. 

E - Para as seções “ Péssimas ”, 
abaixo da crítica. 


-.- ... - -- 

CÓDIGO DA SEÇÃO NOTA/CONCEITO CÓDIGO DA SEÇÃO NOTA/CONCEITO 

C. 001 /_ C. 010 /_ 

C.u. 002 /_ S.O. 011 /_ 


M.P. 003 / 

P. 012 / 

R.S. 004 / 

V.V. 013 / 

M.TK-85 005 / 

P.D.A. 014 / 

E.TK-2000 006 / 

L. 015 / 

LOG. 007 / 

R.TK-90X016 / 

A.A. 008 / / 

H. 009 / / 
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MICROHOBBY PRESS 


O Cruzado e o 
conserto de 
micros 

0 Plano Cruzado do Governo do Pre¬ 
sidente José Sarney está deixando 
suas influências até mesmo na 
área de Assistência Técnica para micro¬ 
computadores brasileiros. Esta informa¬ 
ção foi divulgada pelodiretorcomercial da 
MS Indústria Eletrônica, Sidney Dalben, 
uma das primeiras empresas a atuar neste 
segmento no País. 

Segundo Sidney Dalben, o usuário vol¬ 
tou a investir um pouco mais na conserva¬ 
ção de seu equipamento realizando revi¬ 
sões adequadas e periódicas em seu mi¬ 
cro 0 que, de acordo com Dalben, não 
acontecia no período dos anos 84 e 85, an¬ 
tes do Cruzado. 

Para o diretor da MS, até a decretação 
do Pacote, o usuário tentava consertar o 
seu micro por conta própria e acabava 
acumulando uma série de problemas. 

A MS atualmente atende a assistência 
técnica de várias linhas de equipamentos 
0 que fez com que a empresa ampliasse o 
seu quadro de funcionários de 45 para 55 
profissionais, entre técnicos e engenhei¬ 
ros que já atendem, em média, 11CXD aten¬ 
dimentos mensais. A.L.A. 


Faturamento 
recorde da 
Mierotec 

U ma das empresas fabricantes do 
padrão IBM-PC no Brasil, a Micro- 
tec Sistemas S/A fechou o primeiro 
semestre deste ano com um faturamento 
recorde da ordem de Cz$ 219,9 milhões, 
com aproximadamente 2 mil e 900 máqui¬ 
nas comercializadas, o que representou 
um crescimento, em suas vendas, de 
184,2 em máquinas. 

Segundo pesquisas realizadas pela em¬ 
presa, os maiores compradores de suas 
máquinas continuam sendo os estados 
do Rio de Janeiro e São Paulo o que faz 
com que a base instalada da empresa al¬ 
cance 0 índice de sete mil unidades. 

Para o segundo semestre, a Empresa 
prevê um faturamento bruto de Cz$ 353 
milhões, estimando uma venda de 3.700 
máquinas. A.L.A. /N 



Da esquerda para a direita: Wilson Lazarini, Roseleine Villar D. Furquim 
(Diretora de produção), Clóvis de Barros Carviho (Secretário de Planejamento 
do Estado), Egydio Bianchi (Presidente da Prodesp), Antonio Funari, José 
Ricca e Renè Lapyda. 


Nova diretoria na 
Prodesp 

C omasaída de Wilson Lazzarini,que 
passou a se dedicar à SUCESU/SP 
no cargo de presidente da entida¬ 
de, a Prodesp - Cia. de Processamento de 
Dados do Estado de São Paulo, passou a 
ter um novo diretor na sua área de siste¬ 
mas. 


René Lapyda, professor do Instituto de 
Matemática e Estatística da Universidade 
de São Paulo e ex-gerente de estudos e 
projetos especiais da Caixa Econômica 
do Estado de São Paulo é o novo diretor da 
área de sistemas. 

Ao mesmo tempo tomou posse, tam¬ 
bém, 0 novo diretor administrativo-finan¬ 
ceiro da entidade, Antonio Funari Filho, 
que vinha ocupando, até então, a chefia de 
gabinete da presidência da Prodesp. 
A.LA ^ 


Informática no 
Nordeste 

U m Projeto de realização de uma fei¬ 
ra de informática nas regiões Norte 
e Nordeste começa agora a ser 
concretizado. A Guazzelli Associados, 
empresa especializada na organização e 
realização de Feiras nesta área, na cidade 
de São Paulo, fechou acordo entre os Go¬ 
vernos das duas regiões para a realização, 
no próximo ano (de 9 a 17 de maio), dal In- 
fonor -1 Feira Norte/Nordeste de Informá¬ 
tica, que irá se realizar no Centro de Con¬ 
venções de Pernambuco, em Recife. 

Num período de nove dias, a I Infonor 
mostrará os principais lançamentos em 
computadores, periféricos, acessórios e 
softwares nos estandes das principais 
empresas do setor e realizará, em paralelo, 
o I Encontro Norte/Nordeste de Informáti¬ 
ca. 

O lançamento oficial da I Infonor será 
feito durante a realização da VI Feira Inter¬ 
nacional de Informática, no Rio de Janeiro. 

ai-a. O 


Telex 

U ma nova rede nacional de treina¬ 
mento na área de informática esta¬ 
rá sendo Implantada a partir do se¬ 
gundo semestre deste ano. O Cetil Pro¬ 
cessamento de Dados, um bureauóe ser¬ 
viços conceituado no setor, com 18 anos 
de atuação no mercado e filiais espalha¬ 
das pelas principais capitais do País, está 
ampliando o seu departamento de treina¬ 
mento, passando a oferecer cursos, para a 
formação de mão-de-obra nas suas 19 fi¬ 
liais, cinco associadas e mais duas em¬ 
presas do Grupo. 

Para esta ampliação, segundo Sebas¬ 
tião Tavares Pereira, diretor comercial da 
Empresa, estão sendo investidos cerca de 
Cz$ 3 milhões e adquiridos 32 micros. 

A experiência do projeto de formação 
de mão-de-obra, que visa atender ao mer¬ 
cado profissional da área de Informática, 
começou nas filiais paulistas edo Paraná 
do Cetil e, após realizada a avaliação dos 
resultados, o Grupo decidiu ampliar esta 
experiência através da realização de 526 
cursos, durante o próximo(primeiro)ano de 
funcionamento, da divisão de treinamen- 
to. _o 
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Foto fornecida peta Prodesp ■ Elyon Rodrigues Pula 
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RESENHAS DE SOFTWARE 


Passo a Passo 


Um curso de linguagem 
BASIC. 


Elaine Kelly Lima 


A linguagem BASIC foi desenvolvida 
em 1964 e passou a ser adaptada 
para diversos equipamentos tor¬ 
nando-se, em pouco tempo, extremamen¬ 
te conhecida devido a duas característi¬ 
cas que a fazem abranger quase todas as 
áreas profissionais onde computadores 
de pequeno porte sào muito utilizados: a 
diversidade de comandos e sua flexibili¬ 
dade. 

Nas escolas de computação, o curso 
de BASIC é o mais procurado, tanto por 
quem deseja aprender programação so¬ 
mente como um hobby como também por 
quem quer usar o aprendido como futura 
profissão. Sendo este tipo de curso, na 
maioria das vezes, o primeiro contato do 
aluno com programação, existe a necessi¬ 
dade de um preparo de aulas introdutórias 
que transmitam ao novato as primeiras 
noções e técnicas para desenvolvimento 
de programas. 

Percebendo a necessidade de formar 
programadores com bases técnicas mais 
sólidas, a Potencial Software desenvol¬ 
veu um curso de BASIC, versão Applesoft 
para iniciantes, onde o micro é o profes¬ 
sor. O curso é composto por três partes; 

- um software que ilustra o aprendizado, 
apresentando ao usuário o processa¬ 
mento causado por cada instrução ou 
comando; 

- um tutorial que complementa o software 
e explica detal hadamente à cada nova te¬ 
la, 0 que está sendo exibido e qual deve 
ser o procedimento do usuário. Ao mes¬ 
mo tempo que funciona tal qual um ma¬ 
nual de BASIC, também serve como ma¬ 
nual do software: 

- um caderno de problemas práticos que 
auxiliarão o aluno na assimilação de ca¬ 
da nova matéria apresentada pelo tuto¬ 
rial e software. 

O curso é constituído por dez aulas e 
um teste final que inclui exercícios refe¬ 
rentes a todo seu conteúdo. Cada aula é 
dividida em três fases: parte 7, que é uma 
introdução a determinado assunto; parte 
2, que é um complemento da primeira eta¬ 
pa; e um teste cujos exercícios propostos 
são referentes ao aprendido nas aulas já 
estudadas. É através da última etapa que o 
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usuário será avaliado e ficará sabendo se 
está apto, ou não, a passar para a aula se¬ 
guinte. 

Todas as aulas devem ser acompanha¬ 
das ao mesmo tempo com o software e o 
tutorial. Durante a exibição da aula no mo¬ 
nitor do seu Apple, você deverá prestar 
muita atenção, pois em determinados mo¬ 
mentos será necessário que a tecla RE- 
TURN seja pressionada, isso ocorre para 
que o aluno tenha o tempo que achar ne¬ 
cessário para examinar os visuais, ler o tu- 
torlal e entender o assunto. 

Parte a parte 

Como cada parte do curso apresenta 
assuntos distintos, resolvemos analisar 
aqui todas as aulas, parte por parte, para 
que 0 leitor tenha uma idéia exata do con¬ 
teúdo abrangido pelo curso. 

Aula 1 -parte 7, aqui o aluno será apre¬ 
sentado ao equipamento com o qual está 
trabalhando. Através de um esquema es¬ 
pecial é Qxibido no monitor a memória e a 
utilidade do interpretador; o que é a Lin¬ 
guagem de Máquina; algumas palavras re¬ 
servadas do BASIC; e a instrução PRINT, 
que é responsável pela exibição de cons¬ 
tantes e conteúdo de variáveis em tela. 

Em conjunto são propostos alguns pro¬ 
blemas que permitem ao usuário conhe¬ 
cer os principais erros de sintaxe que po¬ 
dem ocorrer ao usarmos errôneamente, 
esta instrução. 

Aula 1 - parte 2, nesta fase o usuário 
aprenderá a utilizar a instrução PRINT jun¬ 
tamente com os operadores aritméticos, 
para exibir resultados de cálculos de ex¬ 
pressões matemáticas numa única instru¬ 
ção. Para aproveitar o embalo, também é 
demonstrado, de maneira interessante, a 
ordem de importância dos operadores 
aritméticos. 

Os exercícios desta aula serão facil¬ 
mente solucionados se o usuário tiver 
aprendido a lição. 

Aula 2-parte 1, o aluno recebe concei¬ 
tos sobre o que são comandos diretos, o 
que é um programa e qual a diferença en¬ 
tre eles. E 0 por que de deixarmos um in¬ 
tervalo entre as linhas de um programa. 

Aula 2-parte2, aqui serão distinguidos 
comandos e instruções e depois ensina- 
se a utilizar dois comandos, um para apa¬ 
gar programa da memória e outro para 
apagar apenas blocos. Em seguida, o alu¬ 


no aprende a parar o processamento de 
um programa, através de duas Instruções 
diferentes. 

Aula 3 - parte 1, nesta etapa será ensi¬ 
nado o que é uma variável, como elas po¬ 
dem ser nomeadas e quando são usadas. 
Apresenta-se também a instrução que 
possibilita jogar 0 valor de uma expressão 
para uma variável. Os problemas propos¬ 
tos são cinco programas simples que 
usam variáveis e expressões para que o 
aluno analise e compreenda. 

Aula 3 - parte 2, ensina a instrução que 
permite a entrada de dados, via teclado, 
em variáveis durante a execução do pro¬ 
grama. Gomo exercícios são propostos al¬ 
guns temas para que você comece a de¬ 
senvolver programinhas simples e tam¬ 
bém pede-se que o aluno execute três pro¬ 
gramas que lhe mostrarão, na prática, co¬ 
mo o aprendido até o momento é proces¬ 
sado. 

Aula 4 - parte 1, aqui uma das estrutu¬ 
ras de controle do BASIC é ilustrada e 
muito bem explicada, o IF...THEN..., além 
disso, também ensina-se a diferença entre 
desvio condicional e Incondicional para 
queo aluno comece a criar estruturas para 
os seus programas. 

Os exercícios desta fase mostram os 
dois tipos de desvios e o que vem a ser um 
loop. 

Aula 4-parte2, é um complemento pa¬ 
ra a primeira parte, e ensina como usar os 
operadores relacionais nos desvios incon¬ 
dicionais. Para praticar, o caderno de exer¬ 
cícios apresenta dois programas com to¬ 
do conteúdo ensinado até esta etapa do 
curso. O aluno deverá digitar, executar e 
analisar o resultado obtido. 

Aula 5 - parte 7, o aluno aprende uma 
técnicasimples, porém muito utilizada em 
programação, como e porque usar os fa¬ 
mosos '‘contadores”. Os exercícios prá¬ 
ticos apresentam programas maiores que 
os vistos até agora e se o aluno desejar 
realmente aprender, deverá executá-los e 
assim, analisar seus processamentos. 

Aula 5-parte2, aqui é feito um resumo 
das funções apresentadas por esta versão 
do BASIC, e também é explicado detalha¬ 
damente o processamento realizado por 
cada uma delas na memória do micro. Nos 
exercícios propostos aprende-se a contar 
de 5 em 5 por um meio mais complicado. 
Além disso, com dois exemplos muito In¬ 
teressantes 0 aluno passará a entender a 
função que gera números aleatórios. 

Aula 6-parte 7, a explicação a respeito 
da instrução PRINT é complementada e o 
aluno passa a conhecer certos macetes 
para a formatação da tela do vídeo. 

Lição 6 - parte 2, o armazenamento de 
variáveis numéricas e alfanuméricas é 
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ilustrado detalhadamente, tornando fácil 
ao aluno assimilar este processamento in¬ 
terno da máquina. 

Lição 7 - parte 7, mostra detalhada¬ 
mente como deve-se utilizaras instruções 
para chamar uma subrotina e causar um 
retorno. Desta maneira, o usuário percebe 
que nâoé difícil começara criar estruturas 
para tornar os programas tão confusos de 
se entender por causa do uso excessivo 
de GOTO’s. 

Lição 7 - parte 2, o aluno aprende uma 
nova maneira de armazenar constantes 
em variáveis durante a execução do pro¬ 
grama através dos comandos READ...DA- 
TA.Apartirdaqui, os problemas propostos 
são programas que necessitam de altera¬ 
ções para haver uma mudança positiva no 
processamento. 

Lição 8 - parte 1, ou t ra est rutu ra de con- 
trole muitíssimo importante e que todas 
as versões BASIC possuem é apresenta¬ 
da ao aluno nesta lição, o FOR...NEXT. 

Lição 8 - parte 2, quando chegar aqui, 
se o aluno não souber o que é uma tabela 
vetorial, bidimensional ou tridimensional, 
deverá ler atentarpiente o tutorial e prestar 
bastante atenção às explicações do soft¬ 
ware. O segundo ilustra também como 
são alocadas na memória estes tipos de 
variáveis. 

Lição 9-parte 7, se o aluno já chegou a 
esta lição é porque ele consegue desen¬ 
volver muitos programas e certamente es¬ 
tá habituado aos comandos e instruções 
BASIC. Nesta lição é ensinado como po¬ 
demos criar cadeias de FOR...NEXT’s sem 
causar erros de sintaxe, nem erros de lógi¬ 
ca. 

Lição 9 - parte 2, é multo ilustrativa e 
apresenta ao aluno a tela de baixa resolu¬ 
ção-gráfica e os comandos para desenvol¬ 
ver nela alguma coisa. A apresentação da¬ 
da pelo software é multo gostosa de as¬ 
sistir, porém se o aluno não tiver lido o tu- 
torlal ficará um tanto quanto perdido para 
responder aos exercícios. 

Lição 10 - parte 1, pra complementar 
este curso de introdução são apresenta¬ 
dos alguns caracteres especiais utiliza¬ 
dos para facilitar a vida dos programado¬ 
res. 

Lição 70-paríe 2, como esta é a última 
etapa é feito um resumo sobre o processa¬ 
mento interno na exponenciação, ordem 
aritmética e notação científica. 

Além disso, você deverá fazer o teste fi¬ 
nal que contém tudo o que foi dado, sendo 
que através dele o aluno poderá se auto 
avaliar. 

No final do tutorial há uma relação de 
todas as palavras reservadas desta versão 
de BASIC, seus formatos e utilidades. 


Banco de Dados 


A Special Systems oferece ao merca¬ 
do mais uma opção para os usuá¬ 
rios dos micros compatíveis ao TK- 
90X. O programa Banco de Dados possibi¬ 
lita ao usuário o acúmulo de informações 
e sua rápida recuperação. 

Seu desenvolvimento foi feito em As- 
sembler e permite a formatação das fi¬ 
chas do arquivo, ou seja, ele molda a for¬ 
ma com que os dados serão recebidos, 
possibilitando também, a inclusão, exclu¬ 
são, alteração, manipulação de uma única 
ficha, leitura de registros, ordenação por 


ZZOOM 

A sensação de voar dentro de um dos 
aviões de combate, na Segunda 
Guerra Mundial devia ser fantásti¬ 
ca. Agora, imagine-se dentro de um destes 
aviões sendo o piloto e tendo de salvar a 
vida de centenas de pessoas que fogem 
de bombardeios, submarinos e tanques 
de guerra. 

Pois bem, a Multisoft lança no mercado 
um novo software de 48 K de RAM para os 
micros compatíveis ao TK-90X, que simu¬ 
la exatamente o que foi dito e muito mais. 

As telas de jogo são muito bem defini¬ 
das e possibilitam ao usuário a sensação 
quase que real, de tudo que acontece no 
vídeo. 

O jogo se inicia com o piloto automáti¬ 
co, que posiciona o avião em sua posição 


qualquer campo, cópia de uma ficha na 
impressora, leitura e gravação de um Ban¬ 
co de Dados em fita, além de outras vanta¬ 
gens como a opção informação que indica 
ao usuário, a quantidade de memória diS' 
ponível para inclusão de fichas. 

A auto-explicação do programa possibi¬ 
lita seu fácil entendimento e a mais rápida 
familiarização com o sistema. A fita vem 
acompanhada por um folheto de explica¬ 
ção dos principais comandos do Banco 
de Dados. 

Banco de Dados está sendo comercia¬ 
lizado ao preço de Cz$ 100,00 e pode ser 
conseguido na Stop - Praia do Icaraí, 211 - 
Loja 3 - Rio de Janeiro. P.P.A. 


de combate. Logo após, o painel de con¬ 
trole que se localiza no canto superior da 
tela, informa a condição que você se en¬ 
contra no momento: 

- condição verde: o piloto automático é 
desligado e você assume o comando: 

- condição amareia: é o alerta de comba-. 
te; 

- condição vermeiha: é o Ataque, nesta 
condição o usuário deverá destrgir os 
aviões, tanques e submarinos para evitar 
ser atingido pelos mísseis. 

O programa é acompanhado por um fo¬ 
lheto explicativo, contendo as teclas utili¬ 
zadas no jogo e como as utilizar. O jogo é 
rápido e no mesmo nível do software Air 
Woif. 

ZZOOM pode ser encontrado em todos 
os revendedores Microdigital, ao preço de 
Cz$ 59,50. O 
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RESENHAS DE SOFTWARE 


TKdrez 

D esenvolvido para o TK-85 pela Mi- 
crodigital Eletrônica sob a marca 
Microsoft, este software é o adver¬ 
sário perfeito para qualquer enxadrista, 
iniciante ou mestre internacional (com 
duas versões: I e II), isto porque possui se¬ 
te níveis de dificuldade sendo que, para 
cada um, o tempo que o programa demora 
para efetuar uma jogada é diferente. 

No nível mais fácil, esse tempo é de 
aproximadamente dois segundos. Se o 
usuário jogá-lo razoavelmente bem, o pro¬ 
grama realiza sua jogada em até 15 segun¬ 
dos. Se o nível escolhido for à altura dos 
jogadores com prática, o programa demo¬ 
ra até 40 segundos. 

Caso o usuário considere-se bom joga¬ 
dor, o nível de dificuldade aconselhável éo 
3, cuja jogada do programa demora até 
três minutos: já os jogadores bem expe¬ 
rientes devem selecionar o nível 4 cuja de¬ 
mora é de cinco minutos. Porém, se o 
usuário for um mestre internacional sua 
escolha deverá ser feita entre os níveis de 
dificuldade 5 ou 6, onde o padrão de jogo 
será excelente, mas o tempo que temos 
de esperar pelo lance do programa é mui¬ 
tíssimo grande. 

No tabuleiro, as peças brancas são exi¬ 
bidas sobre fundo preto, e as pretas sobre 
fundo branco. O tabuleiro é uma matriz di¬ 
mensionada verticalmente de 1 até 8 e ho¬ 
rizontalmente, de A até H. As peças são in¬ 
dicadas pelas seguintes letras; R - rei; D - 
dama; T - torre; B - bispo; C - cavalo e P - 
peão. 

A partida termina somente quando 
ocorre o xeque-mate e quando isso acon¬ 
tecer, será necessário pressionar qual¬ 
quer tecla para que o programa retorne ao 
menu principal. 

Além da opção de jogo, são oferecidas 
mais duas; analisar ou carregar tabuleiro 
do jogo anterior, que não tenha acabado e 
que, por este motivo, foi armazenado em 
fita. 

Na opção analisar, o usuário pode 
montar um novo tabuleiro ou modificar o 
que está na memória. Atavés dela o pro¬ 
grama encontra o próximo lance da parti¬ 
da. 

Se o usuário possuir umaTK Printer, se¬ 
rá possível copiar o tabuleiro a qualquer 
momento. 

Não perca este desafio e enfrente o 
TKdrez. 

O programa está custando Cz$ 48,50 a 
versão I e Cz$ 51,50 a versão II e pode ser 
encontrado nos revendedores da empresa 
ou em suas unidades de assistência técni¬ 
ca. E.K.L <0 
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Air Wolf 


A ir Wolf é um produto da Multiéoft 
para os compatíveis do TK-90X 
(48K), que possui uma ótima reso¬ 
lução gráfica e oferece muitos recursos 
sonoros, além de forçar o usuário a utilizar 
toda sua perícia para cu mpri r o objetivo do 
jogo. 

O objetivo do jogo é de ultrapassar obs¬ 
táculos sem os atingir com o helicóptero. 
Alguns destes terão de ser destruídos, pa¬ 
ra desobstruir a passagem do helicóptero. 
Ao se encontrar um dispositivo em forma 
de “X", deve-se atingí-lo, utilizando o ca- 


Flipperama 


o jogo do futuro para 

o TK-2000. 


A máquina de jogos do futuro está 
desafiando você para uma partida 
cheia de emoções. Perícia, habili¬ 
dade e reflexo são os principais requisitos 
para o jogador. 

Este programa oferece um completo 
domínio sobre o jogo, transformando o 
seu.equipamento em um sofisticado flip¬ 
perama, com uma superior capacidade de 
entretenimento para você e seus amigos. 

Este jogo, mundialmente conhecido, 
chega agora para o micro trazendo assim, 
a máquina de flipperama para dentro de 
sua casa. 


nhão do helicóptero. Dessa forma, uma 
nova passagem secreta será aberta e o jo¬ 
go continua. 

Se você gosta de jogos difíceis, este 
software é ideal para você. As teclas de 
comando são apresentadas na tela inicial 
e no pequeno folheto que acompanha a fi¬ 
ta cassete. 

Outro importante detalhe é que o pro¬ 
grama é totalmente desenvolvido em Lin¬ 
guagem de Máquina oferecendo um jogo 
rápido e divertido. 

O programa está custando Cz$ 59,50 e 
pode ser encontrado nos revendedores e 
unidades técnicas da Microdigital. P.P.A. 

O 


Todas as características de uma máqui¬ 
na de flipperama foram inseridas neste 
programa, para que você sinta as mesmas 
emoções. 

O jogo é composto de quatro placares 
onde cada jogador tem o direito de jogai 
cinco bolinhas, bônus, canaletas laterais € 
uma central, dois flippers e a possibilida 
de de prender as bolinhas durante o jogo 
etc. 

Antes de iniciar a partida, você deve es 
colher em qual nível deseja jogar. 

Os flippers podem ser controlados atra¬ 
vés do teclado, ou pelo joystick. 

Os efeitos sonoros são muito pareci¬ 
dos com os das máquinas de flipperama, 
dando a sensação de estar diante de uma. 

Este programa desenvolvido pela Mi¬ 
crosoft para o TK-2000, pode ser encontra¬ 
do nos revendedores da Microdigital, ao 
preço de Cz$ 63,50. <\ 



Israel Teixeira 

























MICROHOBBY 


MEGA TK-85 - ÚlTIMA PARTE 


M.TK-85 005 


o Cérebro do 
MegaTK 


Paulo Sérgio Naddeo D. Lopes 
Ricardo Urbini 


A s 30 rotinas apresentadas nas edi¬ 
ções anteriores, possuem cada 
uma sua função específica no jogo 
MegaTK. Porém, elas devem ser executa¬ 
das' no momento certo. O jogo também 
possui muitas variáveis de controle como 
velocidade, número de tiros dos modelos, 
valor de cada modelo destruído, que deve^ 
rào ser ajustadas durante o jogo. O progra¬ 
ma principal, além de cuidar disso tudo 
deve decidir qual caminho tomar para ca¬ 
da finalização do jogo. Portanto, nada me¬ 
lhor do que apelidá-lo de Cérebro. 

Na figura 1 temos o seu fluxograma. 
Os círculos numerados significam que o 
Cérebro está chamando a rotina especifi¬ 
cada pelo número. Ao término da execu¬ 
ção da rotina chamada, segue-se o progra¬ 
ma principal. 

Análise do Cérebro 

Inicialmente chamamos a rotina SLOW 
do Sistema Operacional. Se o micro traba¬ 
lhasse no modo FAST, não veríamos o jo¬ 
go no vídeo, pois neste modo o TK só faz o 
REFRESH do vídeo quando pára, na espe¬ 
ra do teclado. 

A seguir, limpamos a tela e a formata¬ 
mos para 26 linhas, ou seja, sem linha de 
status, zerando a variável DFSZ do siste¬ 
ma operacional. 


mais difícil. Basta alterar o valor inicial da 
variável certa, na área de 40IX a 40F1 (He- 
xa). As possíveis alterações são: 


Variável VIDAS (16609) - Número inicial de vidas 

Valor mínimo: 01. 

Valor máximo; 06 (limitação da 
rotina 17). 

Valor atual; 03. 

Variável VALMOD (16613) - Valor inicial do modelo 
(Dividido por 10). 

Valor mínimo: 01. 

Valor máximo: 05 (Limitação do 
placar). 

Valor atual: 01. 

Variável TIROS (16614) - Número de ciclos necessários 

para gerar os tiros dos modelos 
(cada ciclo é um passo dos 
modelos na Tela). 

Valor mínimo: 00 (gera tiro a 
cada ciclo). 

Valor máximo: FF (limitação do 
byte). 

Valor atual; 10 (gera tiro a cada 
10 ciclos). 


Variáveis TIRMOD (16617, 

16618,16619) - Definem o número de modelos 

qi:e devem gerar os tiros. Cada 
bit em 1 (entre o bit 0 e o bit 4) 
de cada TIRMOD é um modelo. 
À cada geração dos tiros, estas 
variáveis sofrem uma rotação 
nos seus bits. 

Valor mínimo: 00 (nâo geram 
tiro). 

Valor máxirrio: FF (todos geram 
tiro).. 

Valor atual: TIRMOD1: A2 
TIRMOD2: 15 
TIRMOD3: AO 

Variável DELAY (16624) - DELAY de jogo. 

Valor mínimo: 01. 

Valor máximo: FF (limitação do 
byte). 

Valor atual: 06. 


O restante das variáveis são de controle 
do jogo como a posição de tiro do canhão, 
contadores de ciclos para geração dos ti¬ 
ros dos modelos (FIRE) e diminuição da 
energia (voltas), posição do canhão, tiro de 
modelo etc. 


A lógica nos movimentos 


As variáveis 

A cada reinicio do jogo carregamos os 
valores iniciais de suas variáveis. Para is¬ 
so, transferimos os bytes da área; 

40DC - 40F1 (Hexa) para a área 4082 - 4097 (Hexa), 

16604 -16625 16514 a 16535 

que dá um total de 20 variáveis, sendo que 
duas possuem 2 bytes, (veja Mega^TK 
Parte i). Tanto o jogador inexperiente co¬ 
mo 0 viciado podem alterar alguns’parâ¬ 
metros para deixar o jogo mais fácil ou 


Esta é a parte mais complicada do jogo: 
qual seqüência de movimentos deve- 
mos seguir para que tenhamos a im¬ 
pressão de simultaneidade? 

Pedimos que o leitor acompanhe pelo 
fluxograma, para facilitar o entendimento. 

Primeiramente, lemos o teclado. Se as 
teclas 5, 8 ou 0 foram pressionadas, exe¬ 
cutamos a sua função, ou seja, movimen¬ 
tando 0 canhão uma coluna para a esquer¬ 
da, movimentando o canhão uma coluna 
para a direita, ou gerando o tiro do canhão, 
respectivamente. 


Pressionadas ou não algumas destas 
teclas, devemos apagar o tiro do canhão 
(se existir) para que este não entre no mo¬ 
vimento dos modelos. Em seguida, verifi¬ 
camos qual é 0 modelo para chamarmos a 
rotina de movimentação do modelo apro¬ 
priado. Se forem os modelos 0 ou 1, cha¬ 
mamos a rotina de SCROLL para a direita 
(esta só faz o SCROLL das 8 primeiras li¬ 
nhas da tela), porém se forem os modelos 
2 ou 3 devemos apagar o canhão da tela 
antes de chamarmos a rotina de movimen¬ 
tação do modelo, para que este não parti¬ 
cipe do movimento. Estes modelos não 
possuem tiros, portanto podemos restau¬ 
rar o canhão após o movimento deles; os 
modelos 0 e 1 possuem tiros. Assim, logo 
após terem sido feitos os seus movimen¬ 
tos devemos usar os seus tiros. Esta movi¬ 
mentação é feita em duas partes: a primei¬ 
ra é a movimentação daqueles tiros que 
estavam nas8primeiras linhas da telaque 
entraram no SCROLL para a direita. Nesta 
movimentação, eles são ajustados para a 
coluna certa, uma linha abaixo. Aqueles 
que passaram para a nona lir)ha entrarão 
na segunda parte, juntamente com os ou¬ 
tros, que é o SCROLL para baixo dos tiros 
(da linha 8 à linha 21). Só após efetuar es¬ 
ses movimentos é que o canhão será res¬ 
taurado. Cabe à essa rotina de restaura¬ 
ção (22) verificar se um tiro do modelo in¬ 
vadiu as suas posições. Se invadiu, o ca¬ 
nhão explode; caso contrário, reacende¬ 
mos o tiro do canhão que foi apagado para 
não entrar em nenhum destes movimen¬ 
tos. Cabe à rotina 16 - “ACENDE O TIRO 
DO CANHÃO” verificar se na posição não 
tem algum modelo. Este tiro reacende-se 
duas linhas acima da posição anterior pa¬ 
ra que seja mais rápido que qs tiros dos 
modelos. 

Após acertar as variáveis necessárias 
completamos um ciclo, voltando à leitura 
do teclado. Para que um modelo dos tiros 
0 ou 1 atravesse toda a tela são necessá¬ 
rios 32 ciclos (32 colunas). 

Se a variável TIROS valer 10 (hexa), cada 
modelo poderá soltar dois tiros enquanto 
cruza toda a tela, pois esta variável diz o 
número de ciclos necessários para gerar 
os tiros dos modelos. 

Para rodar o jogo basta digitar RAND 
USR 18057. 




; C E R E B R 0 - PROGRAHA PRINCIPAL 


4689 

468C 

CD 0F2B 

CD 0A2A 

inicio: rali slow jcoloca o fslcro no «odo SLON 

cer0i^: call cls ?lÍBpa a tela do nicro 

t> 
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468F 

AF 

xor d 

;tira todas as linhas de edicao da tela,... 

4ó?e 

32 4022 

Id (df5z),a 

;...deixando a tela oda para o Jogo 

4693 

2i 40OC 

Id hl,valini 

jtransfere os valores iniciais das variaveis 

4696 

11 4082 

Id de,direcao 


4699 

01 0016 

Id bc,22 

;22 variaveis de prograna 

469C 

EO B0 

Idir 


469E 

CO 414C 

call rot03 

;desenha o placar e as vidas 

46Ai 

21 4095 

cer020: Id h},nuiod 


46A4 

36 0F 

Id (hl),0fh 

;acerta o nuiero de aodelos ei 15 

46A6 

21 4080 

Id hljlinscroll 

;acerta o nuaero de linhas do scroll dos... 

46A9 

36 08 

Id (hl),8 

;...Rodeios para direita eR 8 

46AB 

21 408F 

Id hl,tiradl 

;acerta os bytes de geracao de tiro dos Rodeios 

46AE 

3A 40E9 

Id a,(valini+13) 

;pega o valor inicial de tirRodl 

46Bi 

77 

Id (hl), a 

;Rodelos da terceira linha (tirRdl): 3 tiros 

46B2 

23 

inc hl 

;(nuRero de tiros = nuRero de bits ON) 

46B3 

3A 40EA 

Id a,(valini+14) 

;pega o valor inicial de tirRod2 

46B6 

77 

Id (hl), a 

jRodelos da segunda linha (tirRd2): 2 tiros 

46B7 

23 

inc hl 


46BB 

3A 40EB 

Id a,(valini+15) 

;pega o valor inicial de tirRod3 

46BB 

77 

Id (hl),a 

;Rodelos da priReira linha (tirRd3): 3 tiros 

46BC 

CO 40F2 

call rot01 

;desenha os Rodelos 0 e 1 

46BF 

21 4084 

cer030: Id hl,po5cncrgia 


46C2 

36 lE 

Id (hl),lch 

;acerta a posicao inicial da energia 

46C4 

21 4089 

Id hl,fltiro 


46C7 

36 00 

Id (hl),0 

;inicializa flag de existência de tiro do canhao 

46C9 

23 

inc hl 


46CA 

36 0E 

Id (hl),0eh 

;acerta a posicao inicial do canhao (coluna 14) 

46CC 

CO 41IF 

call rot02 

;desenha a energia e o canhao 

46CF 

CO 02BB 

cer040: call scankey 

;le teclado 

4602 

2C 

inc I 

jvcrifica se leu alguRa tecla 

4603 

28 0C 

jr z,cer050 

;se nao leu, desvia 

4605 

20 

dec 1 


4606 

44 

Id b,h 


4607 

40 

Id c,l 


4608 

CO 07BO 

call achr 

;deterRina o codigo da tecla 

460B 

7E 

Id a,(hl) 


460C 

FE IC 

cp Ich 

jverifica se o codigo e Ich! tecla "0" 

460E 

CC 458C 

call z,rot25 

;se for tecla 0, chaRa a rotina que gera o.. 

46Ei 

CO 4618 

cer050! call rot28 

;...tiro do canhao; sendo ou nao, chaRa taR-... 

46E4 

21 4095 

Id hl,nuRod 

;...beR, a rotina que Rove o tiro do canhao 

46E7 

AF 

xor a 


46E8 

BE 

cp (hl) 

;verifica o nuRero de Rodelos restantes na tela 

46E9 

CA 4771 

jp z,cerl60 

;se for zero, desvia 

46EC 

21 4088 

Id hI,RodeIo 


46EF 

7E 

Id a,(hl) 


46F0 

E6 03 

and 03 


46F2 

FE 02 

cp 2 

;verifica se sao Rodelos 0,1 ou Rodelos 2,3 

46F4 

30 IC 

jr nc,ccr080 

;se for 2,3 desvia, pois estes nao soltaR tiros 

46F6 

21 4092 

Id hl,fire 


46F9 

3A 408C 

Id a,(tiros) 


46FC 

BE 

cp (hl) 

í> 
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46FD 

30 07 

jr nc,cer070 

se fire > tiros ’• faz-se... 

46FF 

36 FF 

Id (hl),0ffh 

...fire = 0ffh e gera os tiros 

4701 

E5 

push hl 

(fire detemina quando gerar os tiros) 

4702 

CD 44FF 

call rot24 

gera os tiros dos aodelos 

4705 

El 

pop hl 


4706 

34 

cer070: inc (hl) ] 

;se fire (= tiros : incre«enta-se fire 

4707 

CD 41CA 

call rot07 i 

iroda os «odelos para direita 

470A 

CD 445E 

call rot20 | 

lajusta os tiros dos aodelos 

470D 

CD 41AF 

call rot06 | 

ifaz ua scroll dos tiros dos aodelos para baixo 

4710 

18 12 

jr cerl00 | 

;(neste scroll o canhao some da tela) 

4712 

CD 4482 

cer080! call rot21 i 

;apaga o canhao 

4715 

21 4088 

Id hIrRodelo 


4718 

CB 46 

bit 0,(hl) i 

;verifica se e aodelo 2 ou aodelo 3 

471A 

28 05 

jr z,cer090 ; 

ise for aodelo 2, desvia 

471C 

CD 4276 

call rotl2 | 

laoviaenta ua passo o aodelo 3 

471F 

18 03 

Jr cerl00 


4721 

CD 423A 

cer090: call rotll 

aoviaenta ua passo o aodelo 2 

4724 

CD 4499 

cerl00: call rot22 

restaura o canhao 

4727 

FE FF 

cp 0ffh 

se "A" voltar coa 0ffh - o canhao nao foi... 

4729 

20 3B 

Jr nz,cerl50 

...atingido, desviando para cerl50 

472B 

3E IB 

Id a,lbh 


472D 

BE 

cp (hl) ; 

verifica se foi atingido por ua tiro do aodelo. 

472E 

28 03 

Jr z,cerll0 


4730 

CD 436D 

call rotl7 ; 

se foi atingido por ua aodelo - ajusta o placar 

4733 

CD 44BE 

cerll0: call rot23 ; 

explode o canhao 

4736 

21 4087 

ccrl20: Id hl, vidas 


4739 

35 

dec (hl) ; 

decreaenta o nuaero de vidas 

473A 

AF 

xor a 


4738 

BE 

cp (hl) ; 

verifica se terainaraa as vidas 

473C 

38 IC 

Jr c,£erl40 ; 

se ainda nao terainaraa, desvia 

473E 

CD 45BC 

call rot26 ; 

Joga aensagea de fia de partida 

4741 

CD 02BB 

cerl30! call scankey ; 

le 0 teclado 

4744 

2C 

inc 1 


4745 

28 FA 

Jr z,cerí30 ; 

espera uaa tecla 

4747 

20 

dec 1 


4748 

44 

Id b,h 


4749 

4D 

Id c,l 


474A 

CD 07BD 

call achr ; 

pega o codigo da tecla lida 

474D 

7E 

Id a,(hl) 


474E 

FE 38 

cp 38h j 

verifica se foi teclado 'S' 

4750 

CA 468C 

Jp z,cer010 j 

se si a, recoaeca o Jogo 

4753 

FE 33 

cp 33h ; 

verifica se foi teclado 'N' 

4755 

20 EA 

Jr nz,cerí30 ; 

nao sendo 'N'nea S', le teclado novaaente 

4757 

CD 0CDC 

call stop ; 

se teclou 'N', para o Jogo, retornando ao BASIC 

475A 

CD 43BA 

cerl40! call rotl8 ; 

ajusta as vidas 

475D 

CD 4662 

call rot29 ; 

dei ay de Jogo 

4760 

CD 45DB 

call rot27 ; 

apaqa os tiros do aodelo e do canhao 

4763 

C3 46BF 

Jp cer030 ; 

retorna para continuar o Jogo coa novo canhao 

4766 

CD 4343 

cerl50: call rotl6 jacende o tiro do canhao 

4769 

21 4095 

Id hl,nuiiiod 


476C 

AF 

xor a 


4760 

BE 

cp (hl) ; 

verifica se ainda te» «odeio na tela ^ 
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476E 

C2 4807 

jp n2,cer250 

?5e ainda te«, desvia 

4771 

21 4088 

cerl6í5 Id hl, «odeio 


4774 

34 

inc (hl) 

?pa55a para o proxiio «odeio 

4775 

7E 

Id a, (hl) 


4776 

Eó 03 

and 03 


4778 

FE 01 

cp 1 

verifica se e «odeio 0 

477A 

30 41 

jr nc,cer210 

sendo «odeio í,2 ou 3 : desvia se» alterar os... 

477C 

21 4085 

Id hlrcodfflod 

...paraffletros do jogo. (nao coKpletou o ciclo). 

477F 

36 84 

Id (hl),84h 

coloca 05 codigos du modelo 0 na variavel 

4781 

23 

inc hl 


4782 

36 07 

Id (hl), 7 


4784 

21 4096 

Id hl,delayl 


4787 

C8 3E 

srl (hl) 1 

;o delayi cai pela «etade 

4789 

AF 

xor a 


478A 

BE 

cp (hl) 


4788 

38 02 

jr c,cerl70 


478D 

36 01 

Id (hl),l i 

?nao deixa delayi = 0 

478F 

21 4088 

cerl70! Id hl,yali»od 


4792 

7E 

Id a,(hl) 


4793 

06 01 

Id b,l 


4795 

80 

add a,b ; 

!incrementa o valor do «odeio 

4796 

FE 06 

cp 6 j 

inao deixa este ser «aior que 6 

4798 

30 01 

Jr nc,cerl80 


479A 

77 

Id (hl),a ; 

!atualiza a variavel valmod 

4798 

21 408C 

cerl80í Id hl, tiros 


479E 

3E 04 

Id a,4 


47A0 

8E 

Cp (hl) 

verifica se tiros esta co» seu valor «iniwo ... 

47A1 

28 03 

jr z,cerl90 

...(quanto «enor o seu valor «ais tiros os «o... 

47A3 

35 

dec (hl) 

..delos solta»). Se nao estiver, decre»enta de í 

47A4 

. 18 08 

jr cer200 


47A6 

21 4097 

cerl90: Id hl,delaa2 


47A9 

3E 03 

Id a,3 


47AB 

BE 

cp (hl) 


47AC 

30 03 

jr nc,cer200 

;nao deixa delay2 < 3 

47AE 

35 

dec (hl) 

;decre«enta de 3 unidades o delay2 

47AF 

35 

dec (hl) 


4780 

35 

dec (hl) 


4781 

CD 4662 

cer200í call rol29 

jdelay de jogo 

4784 

CD 4482 

call rot21 

;apaga o canhao 

4787 

CD 45DB 

call rot27 

japaga os tiros do «odeio e do canhao 

478A 

C3 46A1 

jp cer020 

;retorna p/continuar o jogo co« novos parasetros 

478D 

FE 02 

cer210! cp 2 

jverifica se e «odeio 1 

478F 

30 0A 

jr nc,cer220 

,• sendo «odeio 2 ou 3, desvia 

47C1 

21 4085 

Id hl,cod«od 


47C4 

36 06 

Id (hl),6 

jcolocâ 05 codigos do «odeio í na variavel 

47C6 

23 

inc hl 


47C7 

36 86 

Id (hl),86h 


47C9 

18 E6 

jr cer200 


47C8 

FE 03 

cer220: cp 3 

jverifica se e «odeio 2 

47CD 

30 0F 

jr nc,cer230 

jsendo «odeio 3, desvia 

47CF 

21 4085 

Id hl,cod»od 

D 
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47D2 

36 09 

Id (hl), 9 

pcoloca 0 codigo do iodelo 2 na variavel 

47D4 

23 

inc hl 


47D5 

36 00 

Id (hl),0 


47D7 

21 4082 

Id hl,direcao 

jacerta o valor inicial da direcao de seu io... 

47DA 

36 FD 

Id (hl),0fdh 

;...vÍKento 

47DC 

18 10 

jr cer240 


470E 

21 4085 

cer230: Id hl,codiod 


47Ei 

36 89 

Id (hl),89h 

Koloca 0 codigo do iodelo 3 na variavel 

47E3 

23 

inc hl 


47E4 

36 00 

Id (hl),0 


47E6 

21 4082 

Id hl,direcao 

;acerta o valor inicial da direcao e do passo... 

47E9 

36 00 

Id (hl),0 

;...do seu ioviiento 

47EB 

23 

inc hl 


47EC 

36 03 

Id (hl), 3 


47EE 

CD 4662 

cer240! call rot29 

;delag de Jogo 

47Fi 

CD 4482 

call rot21 

;apaga o canhao 

47F4 

CD 45D8 

call rot27 

;apaga os tiros do nodelo e do canhao 

47F7 

CD 416D 

call rot04 

;desenha os iodelos (do tipo 2 ou 3) 

47FA 

21 4095 

Id hl,nuiod 


47F0 

36 0A 

Id (hl),0ah 

;inicializa a variavel de nuiero de «odelos=i0 

47FF 

21 41C8 

Id hl,rot07+l 

;acerta o nuiero de linhas que irao rodar... 

4802 

36 15 

Id (hl),15h 

j...para direita na rotina 07 

4804 

C3 46BF 

jp cer030 

jretorna para continuar o Jogo co« novo iodelo 

4807 

21 408E 

cer250! Id hl, voltas 


480A 

34 

inc (hl) 

;increienta o contador de passos do iodelo 

4808 

7E 

Id a,(hl) 


480C 

FE 20 

cp 20h 

;verifica se o iodelo Ja deu 20 passos na tela 

480E 

38 0F 

jr c,cer260 

;se ainda nao, desvia 

48i0 

CD 4325 

call rotl5 

ncaso contrario, decreienta a energia 

4813 

21 4084 

Id hl,posenergia 


4816 

AF 

>:or a 


4817 

BE 

cp (hl) 

;verifica se acabou a energia 

4818 

28 08 

jr z,cer270 

;se sii, desvia 

481A 

21 408E 

Id hl, voltas 


481D 

36 00 

Id (hl),0 

jcaso contrario, zera o contador 

481F 

CD 4662 

cer260: call rot29 

jdelag de Jogo 

4822 

C3 46CF 

Jp cer040 

jretorna para proxiio passo 

4825 

06 05 

cer270: Id b,5 

^terffiinando a energia, perde o canhao 

4827 

CD 41A7 

call rot05 

;delag auxiliar 

482A 

21 408E 

Id hl, voltas 


482D 

36 00 

Id (hl),0 

jzera o contador 

482F 

06 04 

Id b,4 


4831 

C5 

cer280! push bc 


4832 

CD 466E 

call rot30 

;inverte o video 

4835 

06 05 

Id b,5 


4837 

CD 41A7 

call rot05 

jdelay auxiliar 

483A 

Cl 

pop bc 


4838 

10 F4 

djnz cer280 


483D 

CD 4482 

call rot21 

japaga o canhao (perde o canhao sei explodir) 

4840 

C3 4736 

Jp cerí20 

[> 
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Assine hoje mesmo a melhor opção para os 
usuários de micros pessoais. 


> 
m 

CQ 
O 
X 

Rua do bosque, 1234 
01136 - São Paulo, SP. 
Telefone (011)825-4066. 




Agora você ficará sabendo, muito mais, a respeito do universo da 
microinformática. 

As melhores dicas de programação, uma grande variedade de programas e 
vários artigos técnicos estarão, todos os meses, na sua casa. 

Para isso, basta preencher o cupom abaixo e pagá-lo em qualquer agência 


BRADESCO. 


Você tem também a opção de compra dos números atrasados. 

Preencha o encarte que se encontra atrás desta folha e remeta-o para nós. 
Não perca a opórtunidade! 

Quanto antes você assinar Microhobby, mais cedo receberá as informações 
de quem entende de usuário. 


Autorizo pela □ Assinatura Inicial p 

presente minha; □ Renovação ^UU,UU 


Atenção: 

Em caso de renovação de Assinatura, 
cole a etiqueta de endereçamento 
atual no espaço reservado ao endereço, 
via Microhobby. 


Assinante: 


Assinante: 


Endereço: 


Endereço: 


Assinante 

































Endereço 

































Bairro 

















Cidade 










CEP 






Estado 



Fone 













Bradesco - Ag. 0138-4 Consolação - C/C N.° 73966-9 


Valor: Cz$ 200,00 

□ Assinatura Inicial 

□ Renovação 


Bradesco ■ Ag. 0138-4 
Consolação - C/C N.° 73966-9 


Valor: Cz$ 200,00 

□ Assinatura Inicial 

□ Renovação 


Bradesco - Ag. 0138-4 
Consolação - C/C N.° 73966-9 


Válido se autenticado mecanicamente pelo Banco 


Válido se autenticado mecanicamente pelo Banco | Válido se autenticado mecanicamente pelo Bar icc 


Via Microhobby 


Via Assinante 


Via Bane 

































































Exemplares Avulsos 


Caro Amigo, 

Se você não tem as revistas 
do número 9 até a 33 basta 
preencher o cupom ao lado 
(em letra de forma) e remetê-lo 
para nós, acompanhado de 
cheque nominal ou Vale 
Postal em nome de 
Microdigital Eletrônica Ltda/ 
Divisão Microhobby à Caixa 
Postal 54096 - CEP 01136. 


Desejo receber os exemplares citados no cupom abaixo pelo preço de Cz$ 20,00. 


Nome 



Endereço 


Bairro 


Cidade 


Estado 

CEP 

Telefone 


Números Avulsos desejados: 


Cheque n.° Banco: , _ 

Postal: □ 



Prezado Leitor! 
Responda a pesquisa ao 
lado, pois ela tem muito 
valor para nós. 


Prezado Assinante: 

Queremos saber o que você pensa de nós. Por isto, so¬ 
licitamos que responda à pesquisa abaixo: 


1) Qual a sua idade?_ 

2) Qual 0 seu nível de escolaridade? 

1.°GrauD 2.° Grau □ 

Superior Incompleto □ Superior Completo □ 

Outros □ 

3) Qual a sua profissão?_ 

4) Qual 0 seu equipamento? 

Sinclair □ Spectrum □ Apple □ 

I 5) Onde você utiliza seu equipamento? 

Casa □ Trabalho □ Escola □ 

6) Como conheceu Microhobby? 

Amigos □ Bancas □ Lojas □ Outros:_ 

I 7) Onde você mais lê Microhobby?_ 

I 8) Qual 0 assunto de maior interesse? 

Programas □ Artigos Técnicos □ 

I Informação Geral □ Reportagens □ 

I Dicas □ 
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EXPLORANDO O TK-2000 


Fórmula 1 


Neste incrível jogo, 
desenvolvido para o TK-2000, 
você poderá testar toda a sua 
habilidade, pilotando um 
carro de cinco marchas, em 
seis diferentes circuitos 
e aprender um pouco mais 
sobre as capacidades 
gráficas deste micro. 


Cesar de Afonseca e Silva Neto 
Wilson José Tucci 

N este número iremos explorar um 
pouco mais as capacidades gráfi¬ 
cas do TK-2000, através de um jo¬ 
go que as utiliza através de traços e sha- 
pes. São mostrados seis modelos de cir¬ 
cuitos (pistas) em que poderão ser realiza¬ 
das as atividades. A descrição de cada um 
destes circuitos está contida nas linhas 
DATA do final do programa. 

Escolhido 0 circuito, passaremos a 
controlar um carro (SHAPE), durante um 
tempo estipulado. No decorrer deste, tere¬ 
mos que desviar de obstáculos e realizar 
manobras a fim de dar o maior número 
possível de voltas no circuito. Terminado 
este intervalo, o bom motorista receberá 
um tempo extra como bonificação, e po¬ 
derá continuar na corrida por mais algum 
tempo. 

Recebida a bonificação, chega-se à ho¬ 
ra de se fazer a avaliação do motorista. 
Nesta avaliação são levados em conta o 
número de voltas dadas e a dificuldade do 
circuito (circuitos com obstáculos ren¬ 
dem mais pontos). Logo a seguir, verifica- 
se 0 histórico de recordes (arquivo se- 
qüencial) com o objetivo de analisar se al¬ 
gum foi superado. Caso tenha sido, o pilo¬ 
to poderá gravar as suas iniciais, junta¬ 
mente com o seu total de pontos (“score”). 

Técnica empregada 

Você perceberá que o programa é bas¬ 
tante rápido, embora não utilize nenhuma 
rotina especial, em Linguagem de Máqui¬ 
na. 

Se utilizássemos métodos convencio¬ 
nais na comparação do carro com os limi¬ 
tes dos circuitos, o programa se tornaria 
muito lento e inflexível. Lento, pois teria 
que realizar inúmeras comparações a fim 
de verificar se o carro colidiu com a pista, e 
inflexível, pois novos circuitos não pode¬ 
riam ser acrescentados com tanta facili¬ 
dade. 


E.TK-2000 006 


O artifício empregado reside na posi¬ 
ção de memória 234. Esta posição é utili¬ 
zada como um “contador de colisões”, no 
que diz respeito a SH APE-TABLES. Sendo 
assim, só precisamos realizar quatro com¬ 
parações para saber se o carro bateu nos 
limites da pista ou não (linha 740). 

Repare que existe mais do que um valor 
possível de ser encontrado na posição 
234. Isto se deve aos diferentes valores de 
rotação (ROT). 

Este número também está relacionado 
com o número de shapes que é utilizado. 
Portanto, torna-se impraticável controlá-lo 
com um maior número de shapes. 

Introduzindo novos circuitos 

Uma das grandes vantagens deste pro¬ 
grama é a possibilidade de criar novos cir¬ 
cuitos com facilidade. 

A primei ra coisa a ser feita é o desenho. 
Desenhe o circuito em uma folha de papel 
milimetrado e marque os pontos princi¬ 
pais que serão armazenados em linhas 
DATA. Quanto maior for o número de pon¬ 
tos destinados ao circuito, melhor será a 
sua aparência no vídeo, principalmente 
nos casos em que existem curvas. Feito 
isto, já podemos iniciar a codificação do 
circuitò. 

Por exemplo, um circuito que apresen¬ 
te uma borda ao redor de toda a tela teria o 
seguinte início de codificação: 

0,0,278,0,278,158,0,158,0,0,-2,... e a as¬ 
sim por diante. Repare que o-2 tem a finali¬ 
dade de indicar a rotina de desenho que 
diz que o próximo ponto não deverá ser li¬ 
gado ao anterior. Sendo assim, sempre 
que o seu circuito apresentar pontos que 
devam ser descontínuos, estes deverão 
estar separados pelo valor -2. 

Em seguida, utilize uma outra linha DA¬ 
TA a fim de armazenar as variáveis de con¬ 
trole do circuito, na seguinte ordem: 

TL,X1 ,Y1 ,CD,LX,LY,V,NO,HO 

A primeira variável desta lista fTL) con¬ 
tém o valor do tamanho da linha de parti¬ 
da. As variáveis X1 eY1 deverão conter as 
coordenadas vertical e horizontal da posi¬ 
ção inicial do carro no circuito, respectiva¬ 
mente. CD representa a dificuldade do cir¬ 
cuito, devendo ser um número entre 1 e 8, 
já que ao escolhermos a opção de obstá¬ 
culos, o valor 2 é acrescentado a CD, tota¬ 
lizando 10. LXe LYsão as coordenadas do 
ponto mais alto da linha de partida do cir¬ 
cuito. V contém o valor estimado para a 
distância mínima que deve ser percorrida 
pelo carro, a fim de que uma volta seja 
contada. Este valor evita que motoristas 
espertos cortem o caminho através das 
paredes. NO representa o número de obs¬ 
táculos a serem acrescentados, no caso 
desses serem escolhidos. Finalmente, te¬ 
mos HO, altura de cada obstáculo, e as 


coordenadas de cada um dos NO obstá¬ 
culos. 

Entrando com o programa 
Antes de mais nada, você deverá dizer 
ao TK-2000 que este programa será utiliza¬ 
do em outra área de memória, para que se 
evite conflitos com a página 1 de texto e 
gráficos. Isto é obtido com os comandos 
da listagem 1. Feito isto, você pode come¬ 
çar a digitar a listagem 2. 

Estando o programa totalmente carre¬ 
gado, grave-o sob o nome de sua preferên¬ 
cia e prossiga com a entrada da listagem 
3, que corresponde aos dados do carro a 
ser utilizado pelo programa BASIC. Para 
tanto, entre em Linguagem de Máquina 
(LM)edigiteos bytes dafigura da seguinte 
maneira: 

*330:01 00 04 00 27 37 ... 00 (RETURN) 
Volte ao BASIC através de CTRL-C + 
RETURN e grave esta entrada sob o nome 
de CARRO, da seguinte maneira: 

BSAVE CARRO,A$330,L$16 
Antes de rodar o programa, você deverá 
digitar RUN 1350 e criar no seu disco o ar¬ 
quivo de recordes. Páre a execução e ago¬ 
ra você já poderá rodar o programa e verifi¬ 
car os seis circuitos que estão disponí¬ 
veis. Um deles está representado na figura 
1 . 

Quando você estiver pilotando o carro, 
as teclas terão a seguinte função: 

A e Z Mudança de marchas. 

-^e— Mudança da direção do carro. 

Mais adiante existe uma tabela conten¬ 
do as principais variáveis utilizadas neste 
programa, que visa possibilitar a você, 
uma melhor compreensão. 


Tabela de Variáveis Utilizadas 

AM Análise do motorista (numérica). 

AM$ Análise do motorista (alfanumérica). 

BO Quantidade de BÓNUS recolhido. 

BT Número total de batidas durante o percur¬ 
so. 

BX () Matriz contendo as coordenadas X dos 
obstáculos do circuito escolhido. 

BY () Matriz contendo as coordenadas Y dos 
obstáculos do circuito escolhido. 

C Contém o valor 1 se o carro cruzou a linha 

de chegada, ou 2 se o carro bateu em algu¬ 
ma parede. 

CD Dificuldade do circuito escolhido. 

DB Contém o valor 2, sendo adicionada à difi¬ 
culdade do circuito escolhido, no caso de 
haver obstáculos. 

DV Distância viajada durante o percurso. 

LX Coordenada X da linha de partida. 

LY Coordenada Y da linha de partida. 

M Marca em andamento. 

NAS Iniciais do nome do motorista qué bate o 
recorde. 

NA$ () Matriz que contém as iniciais dos recordis¬ 
tas para cada circuito. 

NO Número de obstáculos no circuito. 

NC Número do circuito sendo mostrado. 

PI O valor 3,14159/32, utilizado nas equações 
de seno e cosseno. p> 

25 









MICROHOBBY 


EXPLORANDO O TK 2000 


R Rotação do shape table (carro). 

SC "Score” do percurso. 

SC () Matriz contendo os recordes de cada cir¬ 
cuito. 

T Contém o valor 4, representando o número 

de vezes que o programa tem que realizar o 
laço de decrementar TI (tempo). 

TI Tempo que ainda resta. 

V Contém a distância mínima que o motoris¬ 
ta deve percorrer a fim de marcar uma vol¬ 
ta. 

VLT Número de voltas dadas durante o percur¬ 
so. 

VX Coordenada X antiga do carro. 

VY Coordenada Y antiga do carro. 

X Nova coordenada X do carro. 

XS Valor adicionado a X quando o carro muda 
dedireção, utilizado nas equações de seno 
e cosseno. 

Y Nova coordenada Y do carro. 

YS Valor adicionado a Y quando carro muda 
de direção, utilizado nas equações de seno 
e cosseno. 


LISTAGEM i 

le REH *» SETUP TK/2000 »« 

20 L0HE«: 16384: REM ACIMA DA 
«A’ 

30 POKE Í03,í: POKE 104,64: REH 
INICIO DO PROGRAHA '12001' 
40 POKE 16384,0: REH NECESSÁRIO 


LISTAGEM 2 


100 REH 


F 0 R H U L A - I 


110 REH CARREGAR SHAPE TABLE 
120 PRINT CHRI (4)"BL0AD CARRO, 
A1330": GOSUB 1480:B = 0 
130 REH ROTINA 'INKEYl' 

140 POKE 768,32: POKE 769,67: POKE 
770,240: POKE 771,133: POKE 
772,58; POKE 773,96 
150 REH TELA DE APRESENTACAO 
160 TEXT : HOME 
170 KEY = 768 

180 Ml = " «#« F 0 R H ü L A - I 
- UM JOGO ONDE VOCE PODE 
RA’ TESTAR TODAS AS SUAS HAB 
ILIDADES - PRESSIONE 9UAL8UE 
R TECLA PARA COHECAR " 


199 INUERSE 

200 VTAB l: PRINT SPC( 40): FOR 
I = 2 TO 22: VTAB I: HTAB 1: 
PRINT " HTAB 40: PRINT 

" NEXT : VTAB 23:PRINT SPC( 
40) 

210 VTAB 4: HTAB 10: PRINT SPC! 
22)" HTAB 10: PRINT " F 
0 R H U L A ": HTAB 1 
0; PRINT SPC( 23) 

220 VTAB 9; HTAB 18: PRINT SPC( 

5): PRINT : FOR I = 1 TO 4:HTAB 
19: PRINT " NEXT : HTAB 
18; PRINT SPC( 5) 

230 VTAB 17: HTAB 10: PRINT SPC( 
20): PRINT ; HTAB 10: PRINT 
" HTAB 29: PRINT " ": HTAB 
10: PRINT SPC( 20); NORMAL 

240 VTAB 18; HTAB 11: PRINT LEFTl 
(H1,18):MS = MIDI (Hl, 2) + 
LEFTl (Hl,l): CALL KEY: IF 
PEEK (58) = 0 THEN FOR I = 

1 TO 50; NEXT ; GOTO 240 
250 VTAB 21: HTAB 9: PRINT "VOCE 
0UER OBSTÁCULOS (S/N) ?";: 

GET Rl; IF RI ( > "S" THEN 
BLOCKl = "N" 

260 REH INICIALIZAR VARIAVEIS 

270 DV = 700 

230 M = 2:R = 32 

290 H = 3.14159 / 32 

300 VLT = - l;TIHE = 300 

310 XI = 226:Y1 = 140:1 = Xl:J = 

Y1 

320 POKE 232,48: POKE 233,3: REH 
INICIO DO SHAPE 

330 REH MOSTRAR OS CIRCUITOS 
340 GOSUB 860 
350 I = Xl:J = Y1 
360 X = 277:Y = 157 
370 Z1 = 1 
380 SCALE= 2 
390 REH INICIO DO JOGO 
400 HOME : VTAB 21: HTAB 17: PRINT 
"PRONTO-": FOR H = 1 TO 1000 
: NEXT ; VTAB 21;HTAB 17:PRINT 
" VAI 

410 VTAB 21: HTAB 32: PRINT "HAR 
CHA: ";H - 1 

420 REH DESENHAR CARRO - lA.VEZ 


430 XDRAH 1 AT XI,Yl: GOTO 700 
440 REH VERIFICAR SE 0 CARRO CR 
UZÔU A LINHA DE CHEGADA OU B 
ATE NA PAREDE 

450 IF XI > LX - 20 AND XI < LX + 
20 ANO Yl } = LY AND Yl ( L 
Y + 42 THEN Z = 1: IF DV > V 
THEN VLT = VLT + l; VTAB 21 
; PRINT "VOLTA; ";VLT:DV = 0 

460 IF XI ( LX - 20 THEN CO = 0 
470 ü = INT ( RND (1) * 2): IF U 
= 2 THEN U = - 1 
480 IF Z < >0 THEN 530 
490 REH BATEU 0 CARRO 
500 ROT= 0:M = 2:BT = BT + 1 
510 PRINT CHRl (7): PRINT CHRl 
(7); REH BATEU 0 CARRO 
520 TI = TI - 4;T = 3; VTAB 21: HTAB 
32: PRINT "MARCHA: ";H - 1 


530 

ROT= 

R + 16 



540 : 

Z = 0 




550 

GOTO 

570 



560 

REH 

LER 0 TECLADO 



570 

CALL 

768:P = PEEK 

(58) 


580 

IF P 

= 136 THEN R = 

R - 4: 

IF 


R ( < 

i THEN R = 60 



590 

IF P 

= 149 THEN R = 

R + 4; 

IF 


R > 64 THEN R = 4 



600 

IF P 

= 193 AND H ( 

6 THEN 

HTAB 


32: VTAB 2l:M = H + 

l: PRINT 


"MARCHA; ";M - i 



610 

IF P 

= 218 AND H } 

2 THEN 

HTAB 


32; VTAB 2l:H = H - l; PRINT 
"MARCHA: ";H - 1 

620 XS = (H » 2) * ( COS (R « H)) 

:YS = (H « 2) » ( SIN (R » H 
)) 

630 DV = DV + H 

640 I = Xl:J = Yl:Xl = I + XS: IF 

XI } = X THEN XI = X 

650 IF XI ( Z1 THEN XI = Z1 
660 Yl = J + YS: IF Yl ) Y THEN Y 
1 = Y 

670 IF Yl ( Z1 THEN Yl = 0 
680 IF TI ( 0 THEN TI = 0:T = 3 

690 T = T + l: IF T = 4 THEN TIHE 

= TIME - l:f = 0: VTAB 21: HTAB- 
16; PRINT "TEMPO: "-TI;" 

": IF TIME = ( 0 THEN HTAB 
22: VTAB 21: PRINT "0 ": GOTO 
760 ^ 
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700 XDRAW í AT I,J 
710 R0T= R + 16 
720 XDRA« 1 AT XI,Y1 
730 REH VERIFICAR COLISÃO DE SH 
APES 

740 IF PEEK (234) { >55 ANO PEEK 
(234) ( ) 88 AND PEEK (234 
) ( ) 100 AND PEEK (234) ( 

) 66 THEN 450 
750 GOTO 570 

760 BI = BI + l: IF BI = 2 THEN HOME 
: FOR EG = 1 TO 5: VTAB 2l:HTAB 
15: PRINT "FIM DE JOGO": FOR 
I = 1 TO 400: VTAB 21: HTAB 
15: PRINT " ": FOR 

I = 1 TO 240: NEXT : NEXT:GOTO 
980 

770 IF VLT ( 3 THEN 760 
780 IF VLT > = 3 THEN INVERSE 
: VTAB 23: HTAB 15: PRINT "B 
ONUS: 

790 BO = INT (V » VLT / 300) » 1 
0 

800 IF BL0CK5 ( ) "N" THEN BO = 

BO + 30 

810 REH BONUS 

820 FOR NB = 0 TO BO STEP 10: VTAB 
23: HTAB 22: PRINT NB: NEXT 

830 TIME = B0:BT = BO 
840 NORMAL 
850 GOTO 700 

860 REM CONTROLE DE ESCOLHA DOS 
CIRCUITOS 
870 WC = 1 

880 IF BLOCKS ( > "N" THEN HC = 

HC + 2 

890 GOSUB 1550 

900 VTAB 21: HTAB 2: PRINT "APER 

TE (FIRE) P/ ESCOLHER UM CIR 

CUITO": VTAB 22: HTAB 8: PRINT 

"9ÜAL3UER OUTRA P/ CONTINUAR 
// 

910 NC = HC + CD: VTAB 23: HTAB 1 
: PRINT "CIRCUITO #"?UC?" Dl 
FICULDADE (1-10) = ":NC;" 

êt 

920 NC = 0 

930 CALL KEY:CK = PEEK (58): IF 
CK = 0 THEN 930 

940 IF CK = 174 THEN RETURN : REM 
FIRE 


950 yc = MC + l: IF HC = 7 THEN H 
C = l: RESTORE 
960 GOTO 890 

970 HPLOT BX,BY TO BX,BY - HO TO 
BX + 2,BY - HO TO BX + 2,BY TO 
BX,BY: RETURN 

980 REM MOSTRAR ANALISE DO MOTO 
RISTA 
990 TEXT 

1000 INVERSE : HTAB 12: PRINT "P 
ERFORMANCE DO MOTORISTA":NORMAL 

1010 PRINT : PRINT "—)CIRCUITO 
«";HC 

1020 PRINT : PRINT "—)# DE VOL 
TAS; ";VLT 

1030 PRINT : PRINT )TEMPO NE 
DIO POR volta: ";: IF VLT = 

0 THEN PRINT "300 SEG.": GOTO 
1050 

1040 PRINT INT ((300 + BT) / VL 
T>" SEG." 

1050 PRINT ; PRINT "—)# DE BAT 
idas: ";BT 

1060 IF BLOCKI ( ) "N" THEN CD = 

CD + 2 

1070 PRINT ; PRINT )NIVEL DE 
DIFICULDADE DO CIRCUITO :"; 

CD 

1080 AM = VLT + CD 
1090 IF AM ( 8 THEN AMI = "CHAME 
M UMA AMBULANCIA !": GOTO 11 
40 

1100 IF AM ( 11 THEN AH5 = "CONT 
INUE TENTANDO"; GOTO 1140 
1110 IF AM ( 15 THEN AMt = "VOCE 
DIRIJE BEM": GOTO 1140 
1120 IF AM ( 1? THEN AMS = "MUIT 
O BOM, MESMO !": GOTO 1140 
1130 AMS = "AYRTON SENNA QUE SE C 
UIDE !" 

1140 VTAB 13; PRINT )AVALIAC 
AO :";AMS 
1150 SC = y » VLT 

1160 IF BLOCKS ( ) "N" THEN SC = 

SC + (50 * VLT) 

1170 PRINT ; PRINT "—}RESULTAD 
O FINAL ;"!SC 

1180 IF SC } SC(HC) THEN GOSUB 
1250; REM NOVO RECORDE 
1190 FOR HW = 1 TO 5000; NEXT .'GOTO 
1410 


1200 PRINT : HTAB 2: PRINT "ESCO 
LHA ; (T>ERMINAR OU (RET) P/ 
OUTRA" 

1210 GET RS 

1220 IF RS = "T" THEN TEXT : HOME 
: END 
1230 CLEAR 
1240 GOTO 160 

1250 VTAB 17; HTAB 1: CALL - 95 
8 

1260 FOR I = 1 TO 10: VTAB 17: HTAB 
13: 

1270 PRINT "NOVO RECORDE";: HTAB 
13; PRINT " ": FOR 

HM = 1 TO 100; NEXT 
1280 NEXT 

1290 VTAB 19; HTAB 10: PRINT "EN 
TRE COM SUAS INICIAIS" 

1300 VTAB 21: HTAB 18: PRINT CHR5 
(95); CHRS (95); CHRS (95) 

1310 FOR I = 0 TO 2 
1320 VTAB 21: HTAB 18 + l: GET A 
S; PRINT AS;NAS = NAS + AS 
1330 NEXT 

1340 SCÍHC) = SC:NAS(WC) = NAS 
1350 PRINT CHRS (4)"OPEN FI.REC 
ORDE" 

1360 PRINT CHRS (4)"URITEFI.REC. 
ORDE" 

1370 FOR I = 1 TO 6 

1380 PRINT SC(I): PRINT NAS(I) 

1390 NEXT 

1406 PRINT CHRS (4)"CLOSE" 

1410 HOME ; HTAB 10: PRINT "HIST 
ORICO DOS RECORDES" 

1420 VTAB 5: PRINT "CIRCUITO « " 

;: HTAB 17: PRINT "SCORE";:HTAB 
27: PRINT "DETENTOR"; PRINT 

1430 FOR I = 1 TO 6 
1440 PRINT "CIRCUITO It ";I;; HTAB 
17; PRINT SC(I);; HTAB 32:?RINT 
NAS(I) 

1450 PRINT 
1460 NEXT 

1470 PRINT : GOTO 1200 
1480 PRINT CHRS (4)"0PEN FI.REC 
ORDE" 

1490 PRINT CHRS (4)"READ FI.REC 
ORDE" 

1500 FOR I = 1 TO 6 

í> 


27 










MICROHOBBY 


EXPLORANDO O TK 2000 


2 THEN Í560 
- 3 THEN Í670 


1510 INPUT SC(I): INPUT NA5(I) 

1520 NEXT 

1530 PRINT CHR5 (4)"CL0SE" 

1540 RETURN 
1550 HGR : HCOLOR= 3 
1560 READ X 
1570 READ Y 
1580 XV = X:YV = Y 
1590 HPLOT X,Y 
1600 READ X 
1610 IF X = - 
1620 IF X ( } 

1625 READ TL 

1630 READ X 

1640 READ Y:YV = Y 

1650 HPLOT X,Y TO X,Y + 3:Y = Y + 

6: IF Y > YV + TL THEN READ 
X1,Y1,CD,LX,LY0,V,NO,HO: FOR 
I = 1 TO NO: READ BX(I),BY(I 
): NEXT ; GOTO 1710 
1660 GOTO 1650 
1670 READ Y 

1680 HPLOT XV,YV TO X,Y 
1690 XV = X:YV = Y 
1700 GOTO 1600 

1710 IF BLOCKI = "N" THEN RETURN 

1720 FOR I = 1 TO NO: HPLOT fiXd 
),BY(I) TO BXÍI),8Y(I) - HO TO 
BX(I) + 2,BY(I) - HO TO BXd 
) + 2,BY(I) TO BX(I),BY(I):NEXT 
: RETURN 

2000 REH DADOS DOS CIRCUITOS 
2010 DATA 0,0,278,0,278,153,0, 
158,0,0,-2,84,0,84,84,180,84 
,-2,42,42,42,122,222,122,222 
,42,126,42,-3,40,222,124 




2150 DATA 4,14,42,42,82,14,83,9 
8,42,126 

2160 REH DADOS DA SUPER PISTA 

2170 DATA 200,10,60,10,39,15, 
26,24,17,35,10,55,10,111,15, 
130,24,141,33,149,50,151,62, 
149,72,145,80,138,33,126,90, 
117 

2180 DATA 90,107,90,91,92,86,96 
,35,99,87,100,91,100,125,106 
,140 

2190 DATA 115,150,126,155,136,1 
56,180,156,195,154,206,150,2 
14,145,220,140,260,92,267,79 

2200 DATA 270,66,270,55,263,44, 
262,32,252,21,240,14,230,11, 
200,10 

2210 DATA -2 

2220 DATA 200,40,61,40,53,41,46 
,45,42,51,40,57,40,110,42,11 
7,47,120,51,121 

2230 DATA 56,120,60,116,61,108, 
61,89,63,76,71,65,80,58,91,5 
5,101,55,110,58 

2240 DATA 120,65,126,72,130,84, 
130,118,131,124,135,126,181, 
126,139,124,196,120,203,113 

2250 DATA 235,75,240,67,241,60, 
240,54,237,48,231,43,225,40, 
200,40 

2260 DATA -3,30,200,10,200,25, 
8,200,10,300 

2270 DATA 2,10,160,40,120,20 


LISTAGEH 3 


*330.345 

0330- 01 00 04 00 27 37 2E 36 
0338- 3E 37 2E 25 2C 2D 36 3F 
0340- 24 24 2C 24 37 00 


O 
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LOGO 


LOO. 007 



Uma Introdução, 
através do TK-90X 


Além de desenvolver 
a criatividade da criança, 
o LOGO aumenta o poder de 
concentração e agiliza 
o raciocínio. 


Elaine Kelly Uma 


A o final da década de 60 um grupo I - 
derado pelo matemático Seygmour 
Papert desenvolveu, no Instituto de 
Tecnologia de Massachusetts, a primeira 
versão do LOGO. O objetivo deles era criar 
uma linguagem que pudesse ser usada no 
ensino de crianças e para isso basearam- 
se em estudos realizados por Jean Piaget 
que comprovavam não ser aconselhável 
ensinar crianças a programar em determi¬ 
nada linguagem, pois elas sentem dificul¬ 
dades para compreender conceitos abs¬ 
tratos. 

Segundo o grupo, a linguagem deveria 
ajudar a criança a desvendar o mu ndo sem 
exigir que ela decorasse comandos. Pelo 
contrário, o aprendizado deveria ser es¬ 
pontâneo e à medida que houvesse ne¬ 
cessidade de ampliar seus conhecimen¬ 
tos, a própria criança se interessaria por 
descobriras novas instruções e recursos 
oferecidos, com os quais seria capaz de 
inovar e melhorar as rotinas que quisesse 
desenvolver. 

Como resultado final da pesquisa do 
grupo nasceu o LOGO, que conseguiu o 
sucesso imediato devido às suas caracte¬ 
rísticas. E, atualmente é inúmera a quanti¬ 
dade de versões que a linguagem possui 
para diferentes equipamentos. 

O TK-90X e o LOGO 

Por ser um micro acessível e oferecer 
recursos tais como cor e som, os micros 
da linha Spectrum como o TK-90X sempre 
tiveram um número muito grande de usuá¬ 
rios. 

Entre as usuários que adquirem o TK- 
90X muitas preferem deixar os filhos afas¬ 
tados do equipamento, ou seja, o menor 
tempo possível em contato com ele, por 
temerem que o televisor cause tensão 
ocular à criança. Porém, os pais não de¬ 
vem se preocupar com isso, pois raramen¬ 
te a criança consegue ficar multo tempo 
concentrada em alguma coisa e desta ma¬ 


nei ra, elas não estão sujeitas a este tipo de 
problema. 

A única coisa pela qual os pais devem 
ficar alertas é que algumas linhas de tele¬ 
visores a cores fabricados antes de 1970 
emitem uma pequena carga de radiação, 
que é prejudicial. Por este motivo é bom 
certificar-se de que o seu televisor a cores 
utilizado tenha sido fabricado posterior¬ 
mente à esta data. 

Agora, com o desenvolvimento de uma 
versão do LOGO para esse equipamento, 
ficou provado que no processo de educa¬ 
ção infantil este pode ser muito favorável 
às crianças, pois mistura seus recursos 
com tecnologia desenvolvida especial¬ 
mente para o ensino. Além disso introduz 
a criança no universo da computação de 
maneira gostosa e descontraída, o que a 
entusiasma, criando um novo Interesse 
quanto à utilização do micro. 

Utilizando o LOGO 

Tendo como objetivo primordial am¬ 
bientar a criança com processamento de 
dados sem forçar sua cabecinha, os co¬ 
mandos da linguagem foram nomeados 
de acordo com o conceito de que a crian¬ 
ça não seja obrigada a decorá-los. 

E dessa forma, os comandos foram 
transformados em palavras do seu voca¬ 
bulário habitual, que geram respostas cu¬ 
jo sentido tenha a mesma idéia do signifi¬ 
cado da palavra. 

Para que a criança tenha algo visível à 
sua frente que elhe forneça a idéia de exe¬ 
cução das suas “ordens” (comandos), o 
LOGO possui uma tartaruga que á a res¬ 
ponsável pelo traçamento dos desenhos. 

O método de aprendizagem da lingua¬ 
gem é simples, sendo que a criança assi¬ 


mila os comandos através da prática pró¬ 
pria, ou seja, ela testa várias vezes os co¬ 
mandos e instruções e verifica, à cada no¬ 
va tentativa, a resposta dada pela tartaru- 

ga-, 

E bom lembrar que desta maneira a as¬ 
similação dos conhecimentos será muito 
mais rápida e duradoura, visto que a crian¬ 
ça está aprendendo por si mesma. 

De acordo com o dito acima ao Iniciar o 
contato da criança com o micro você deve 
mostrar a ela um comando, deixando-a 
testá-lo. Desta maneira, ela irá errar várias 
vezes, e assim se ambientará com os limi¬ 
tes da “tartaruga”. 

Alguns dos principais comandos da 
versão LOGO para o TK-90X são: 


Comando 

Utilidade 

VENHA 

Faz com que a tartaruga apareça 
na tela 

LIMPE TELA 

Apaga tela 

AVANCE N 

Faz a tartaruga avançar N passos 

VOLTE N 

Faz a tartaruga voltar N passos 

DIREITA G 

Faz a tartaruga girar G graus 
à direita 

ESQUERDA G 

Faz a tartaruga girar G graus 
à esquerda 


Por exemplo, no início a primeira instru¬ 
ção que será apresentada à crlariça será 
VENHA e desta maneira, ela perceberá 
que este comando provocará o apareci¬ 
mento de uma figura no centro da tela, fi¬ 
gura que não é nada mais nada menos, do 
que a famosa tartaruga que acompanhará 
todas os traçados de cada desenho. 

Vendo a tartaruga, a criança sentirá ne¬ 
cessidade de aprender como fazê-la andar 
e assim, sentirá a necessidade de usar e 
desvendar os segredos do comando 
AVANCE que a faz avançar n passos na di- 
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reçào à qual ela foi direcionada. Da mes¬ 
ma maneira, o comando VOLTE será assi¬ 
milado. 

Já os comandos como DIREITA e ES¬ 
QUERDA, (que sào utilizados pelos adul¬ 
tos por melo de conhecimentos geométri¬ 
cos sobre ângulos), devem ser aprendidos 
pelas crianças por meio de testes que elas 
devem fazer até que consigam identificar 
0 resultado obtido. Uma vez tendo a noção 
sobre a dimensão do giro, a criança estará 
apta a coonhecer novos comandos ou en¬ 
sinar a tartaruga a construir coisas maio¬ 
res. 


O comando APRENDA permitirá que a 
criança implemente a linguagem com no¬ 
vas estruturas que serão especificadas e 
nomeadas por elas. 

De início proponha à criança que faça 
rotinas para desenhar formas geométri¬ 
cas, tais como quadrados, retângulos ou 
triângulos e desta maneira, ela deve ten¬ 
tar, sózinha, desenvolver essas rotinas, 
pois se ela realmente assimilou os co¬ 
mandos tem capacidade para isto. 

Depois de ter Implementado vários pe¬ 
quenos desenhos à linguagem, a criança 


começa a juntá-los e assim idealiza proje¬ 
tos maiores e passa a perceber que o LO¬ 
GO tem uma amplitude muito maior do 
que ela imaginava. 

Rotinas para formar uma casa no vídeo 

Através da junção de três rotininhas 
que são criadas, separadamente, a crian¬ 
ça pode fazer o formato de uma casa na te¬ 
la. Essas rotinas foram desenvolvidas so¬ 
mente com a utilização dos comandos bá¬ 
sicos da linguagem. 


COMANDOS 

APRENDA QUADRADO 
ESQUERDA 90 
AVANCE 30 
ESQUERDA 90 
AVANCE 30 
ESQUERDA 90 
AVANCE 30 
ESQUERDA 90 
AVANCE 30 
FIM 



COMANDOS 

APRENDA RETÂNGULO 
DIREITA 90 
AVANCE 50 
DIREITA 90 
AVANCE 30 
DIREITA 90 
AVANCE 50 
DIREITA 90 
AVANCE 30 
FIM 


FORMAÇÃO DE RETÂNGULO 


COMANDOS 

APRENDA TETO- 
DIREITA 90 
AVANCE 50 
ESQUERDA 135 
AVANCE 30 
ESQUERDA 45 
AVANCE 45 
ESQUERDA 60 
AVANCE 25 
ESQUERDA 120 
AVANCE 30 
ESQUERDA 127.5 
AVANCE 27 
FIM 


FORMAÇÃO DO TETO 


^ - ► 

2 


3 fc_ 

4 ^ 

\ 



5 

6 , 

/. \ 

A \ 


COMANDOS 

APRENDA CASA 

QUADRADO 

RETÂNGULO 

TETO 

FIM 
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ASSEMBLER AVANÇADO 


A.A.006 


Pãre e verifique 
os endereços! 


Christiano A. C. Nasser 


V árias vezes, quando estamos pro¬ 
gramando em Linguagem de Má¬ 
quina necessitamos parar e verifi¬ 
car 0 conteúdo do acumulador e dos regis¬ 
tradores, para em seguida continuarmos 0 
processamento e em muitas ocasiões não 
dispomos de um programa mapeador que 
apresente todos os endereços usados e o 
resultado das operações aritméticas. 

Para estes casos, a rotina abaixo pode 
ser muito útil; 

PARE 

BRK 

NOP 

PLA 

PLA 

JSR $FF3F 
RTS 

A qualquer momento, desejando parar 
o programa, mande-o para a JSR pare. O 
processador vai reconhecer o BRK e em 
seguida, mostrar o acumulador, os regis¬ 
tradores X e Y, e algumas FLAGS. 

Como funciona 

O que acontece no processador quan¬ 
do um BRK é encontrado, é que o TK-2000, 
ignora o próximo byte (no caso NOP) e co¬ 
loca 0 endereço do primeiro PLA nas posi¬ 
ções $3A E$3B, guardando as flags e 
STACKs nas posições de $45 até $49. 

Continuando o processamento, o TK- 
2000 pega o conteúdo das posições $3A e 
$3B, monta o endereço e continua a rodar 
o programa a partir daí. 

Os PLAs são necessários para recupe¬ 
rar os dois bytes que são usados no 
STACK. (Posiciona a próxima linha a ser 
executada no programa). 

Os próximos dois bytes serão usados 
pela instrução seguinte, RTS retornando 
para seu programa. 

A subrotina $FF3F é usada para resta¬ 
belecer os conteúdos dos registradores, 
do acumulador e status. 

Vamos verificar internamente as intrin- 


cadas "malhas” 

do complexo da rotina 

$FF3F. 



FF3F: AD F3 07 

LDA 

STATUS 

FF42: 48 

PHA 


FF43: A5 45 

LDA 

ACC 

FF45: 4C 3A FC 

JMP 

RSTR1 

FF48; EA 

NOP 


FF49: EA 

NOP 


FF4A: 4C 9D FB 

JMP 

SAVE1 


FF4D: 8C F2 07 

STY 

YREG 

Nesta rotina, restauramos os valores de 

FF50: 08 

PHP 


X, Y e do STATUS no STACK. Em seguida. 

FF51: 68 

PLA 


voltamos à rotina principal. 

FF52: 8D F3 07 

STA 

STATUS 

Em $FF4A, vamos para mais uma roti¬ 

FF55: BA 

TSX 


na, onde salvaremos o acumulador e o re- 

FF56: 8E F4 07 

STX 

STNP 

gistrador X. 


FF59: D8 

CLD 


FB9D:85 45 

STA ACC 

FF5A: 60 

RTS 


FB9F: 8E F1 07 

STX XREG 

No caso: 



FBA2: A5 45 

LDA ACC 

STATUS — 

$07F3 


FBA4: 8D FO 07 

STA AREG 


ACC — $45 
RSTR1 — $FC3A 
SAVE1 —$FB9D 
YREG — $07F2 
STNP — $07F4 
XREG — $07F1 

Nas três primeiras linhas, armazena¬ 
mos o STATUS no STACK. Em seguida, te¬ 
mos JMP RSTR1, que é a segunda rotina 
utilizada. Vamos conferir: 
FC3A;AEF107 LDX XREG 

FC3D: AC F2 07 LDY YREG 

FC40; 28 PLP 

FC41: 60 RTS 


FBA7:4C 4D FF JMP SAV3 

Esta última linha, mada de volta à rotina 
principal, fechando a “malha”. As linhas 
seguintes salvam o valor de T em YREG; o 
registrador de STATUS em “STATUS” 
($07F3), e o STACK POINTER em SPNT. 

Como podemos perceber, o que existe 
é um intricado sistema de subrotinas que 
se encaixam, para realizar uma só opera¬ 
ção. Examine a figura 1, para entender me¬ 
lhor as rotinas que acabamos de ver. 


FIGURA 1 


$ FF3F 


$ FC3A ^ 

SUB/ 

PRINCIPAL 

$ FB9D 

2.' 

ROTINA 

^ 

1 FF48 


S/P 


- ^ 

• 

i 

1 

1 

1 

1 

$ FF42 

3 * 

ROTINA 


S/P 
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Líght-Pen 


A Microdigital colocou no 
mercado mais um periférico' 
para tornar o seu TK-90X, 
cada vez mais, um micro 
voltado às suas 
necessidades. 


Elaine Kelly Lima 


Q uando comparamos os micros aos 
sistemas maiores logo encontra¬ 
mos as restrições por eles apre¬ 
sentadas, tais como: a pequena capacida¬ 
de de memória e a baixa-resolução gráfi¬ 
ca, que provocam a redução do número de 
cores geradas. Além disso, o seu uso em 
aplicações que exigem a transmissão de 
informações via imagens, apresenta pro¬ 
blemas relativos à introdução, manipula¬ 
ção e saída de dados no equipamento. 

Para contornar isso e agilizar a execu¬ 
ção de determinados processamentos, os 
fabricantes de sistemas gráficos pesqui¬ 
saram e desenvolveram dispositivos de 
1/0 (entrada/saída) que visavam auxiliar os 
usuários na elaboração de imagens digi¬ 
tais. Pôde-se comprovar, a partir de entãó, 
que os micros, desde que bem equipados, 
poderiam fazer muito por seus usuários. 

A fim de aumentar as áreas de aplica¬ 
ção abrangidas por seu TK-90X e satisfa¬ 
zer os usuários deste micro, a Microdigital 
tornou disponível ao mercado mais um 
periférico: a caneta óptica, também co¬ 
nhecida como “light-pen”. 

Como definição, podemos dizer que es¬ 
te periférico obtém sinais emitidos pela 
tela da TV, enviando-os posteriormente, 
ao micro. Além disso, possibilita a defini¬ 
ção de um desenho diretamente na tela. 

Basicamente, a light-pen é utilizada pa¬ 
ra a escolha de uma opção de um progra¬ 
ma de menus ou para a geração de f igu ras 
de diversas formas, cores e tamanhos, na 
tela da TV. 

Fazendo parte do hardware do equipa¬ 
mento, este periférico é utilizado em con¬ 
junto a um software que o coordena e sem 
o qual não funcionaria. Este software é um 
programa que é adquirido, simultanea¬ 
mente, com 0 periférico. 

Quando a light-pen é utilizada para sele¬ 
cionar opções em um programa de menus 
deve-se ter o software carregado, na me¬ 
mória do equipamento. Em seu programa 
deverá constar a chamada para a roti na do 
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software, que detectará a luz da TV e retor¬ 
nará com 0 número da linha, da opção que 
a caneta apontou. Além desta, outras sub- 
rotinas podem ser chamadas durante a 
execução de um programa. 

O manual que acompanha o periférico 
explica tudo sobre as rotinas do software 
e dá aos usuários alguns “macetes” de co¬ 
mo tornar a light-pen um periférico bem 
empregado. 

E bom observar que a light-pen não ne¬ 
cessita de qualquer programa para ser uti¬ 
lizada, muito pelo contrário, o software 
que a acompanha pode ser utilizado como 
aplicativo, oferecendo diversas opções 
que possibilitarão a elaboração de dese¬ 
nhos com muita facilidade e sem compli¬ 
cações para leigos em processamento de 
dados. 

Os desenhos podem ser conseguidos 
apenas pressionando-se uma tecla e pas¬ 
sando a caneta sobre a tela da TV, sendo 
que além de permitir o desenho com cane¬ 
ta, à mão livre, as outras opções ofereci¬ 
das são: 

- eliminação do último desenho executa¬ 
do; 

- traçamento de linha da origem ao desti¬ 
no, sendo que ambos são especificados 
pelo usuário; 

- movimentação do posicionador de exibi¬ 
ção; 


Uma mào, uma caneta e uma tela, a 
mágica do light-pen começa a surgir. 



Os segredos da máquina são 
desvendados com a ajuda do 
pequeno 90. 


Israel Teixeira Israel Teixeira 






































MICROHOBBY 


- traçagem de círculo; 

- traçagem de quadrilátero; 

- preencher uma forma fechada com de¬ 
terminada cor; 

- definição da cor da borda da tela; 

- definição da cor do traçado; 

- definição da cor do fundo da tela; 

- apagar a tela; 

- salvar e carregar telas em memória auxi¬ 
liar; 

- armazenar na memória até quatro pági¬ 
nas de vídeo; 

- reapresentação ou movimentação de pá¬ 
gina em memória; 


- traçagem de arco sendo definido, pelo 
usuário, três pontos; 

- e inserção de texto à imagem. 

Este periférico é acessível aos TK-90X 
de 16 e 48 Kbytes de RAM tendo larga utili¬ 
zação pessoal e profissional. Seu manual 
e sua utilização são fáceis e práticos. Por¬ 
tanto não se intimide e acople, mais este 
recurso, ao seu equipamento. A light-pen 
está sendo comercializada juntamente 
com a nova versão do TK-90X; o TK-90X 
Color-LP. 


O pacote Light-pen: software, caneta 
óptica e a interface. 
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Coloque estes endereços na 
memória do seu TK 

Unidades de Serviço Técnico Microdigitai Eietrônica 


Sâo Paulo 
Rua Tagipurú, 209 
Perdizes - CEP: 01156 
Tel.: (011) 67-1831 

Recife 

Rua Maria Carolina, 205 gj. 109 

CEP: 50000 

Tel.; (081) 3268210 


Porto Alegre 

Rua Borges de Medeiros. 410, 11. 
Sala 1103-CEP 90000 
Tel.; (0512) 24-5060 

Rio de Janeiro 

Rua Santa Luzia, 799, sala 302 

CEP: 20000 

Tel.: (021) 2208263 


Brasília 

SDS Edifício Eldorado, sala 112 

CEP: 70000 

Tel : (061) 226 1923 


Belo Horizonte 

Rua Almirante Alexandrino, 125 

Salas 34/35 - CEP: 30000 


Autorizada Nelsen & Cia. Lida. (Curitiba - Paraná) 

Rua 15 de Novembro, 1318 - CEP: 80060 

C.G.C.: n.° 77.577.336/0001-46 

Inscr. Est. n.° 10.141.373M - Tel.: (041) 64-5422 

Autorizada Led - Laboratório de Eietrônica 
Digitai (Bauru - São Pauio) 

Rua 1.° de Agosto, 4/47 - 4.° andar s/401-402-D 
CEP: 17100 - C.G.C.: N.° 54.426.515/000187 
Inscr. Est. n.° 24.684 - Tel.: (0142) 22-3548 

Autorizada Tecnocomp Assistência Técnica a 
Microcomputadores (Fiorianópoiis - Santa 
Catarina) 

Rua Pedro Soares, 14 - Centro - CEP: 88000 

C.G.C.: n.° 76.823.970/0001-59 

Inscr. Est. n.° 250.987.147 - Tel.: (0482) 22-0774 

Autorizada Faiantão Sonorização e Acessórios p/ 
Autos Ltda. (Campinas - São Paulo) 

Av. Francisco Glicério, 277 - CEP: 13100 

C.G.C.: n.° 44.202.315/0001-97 

inscr. Est. n.° 244.783 - Tel.: (0192) 31-5537 


Autorizada LABEL Computadores e Sistemas 
(Fortaleza) 

Av. Antonio Sales, 1500 - CEP: 60000 
Tel.: (085) 244-0859 


Autorizada Independência Representação e 
Comércio (Salvador) 

Rua Alfredo Rocha, 525 - CEP: 40000 
Tel.: (071) 233-2825 


Autorizada Intermidia Computadores e 
Informática (Natal) 

Av. Nascimento de Castro, 1913 - CEP: 59000 
Tel.: (084) 221-0013 - 2214201 


Isto é Microdigitai mais perto de você 
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As linguagens de 
programação... 


... responsáveis pelo 
intercâmbio de informações 
entre o homem e a máquina. 


Elaine Kelly Lima 
Marcos Lorenzi 
Paulo Panagiotis Alvanos 


O computador é um objeto extrema- 
mente “burro”, é incapaz de resol¬ 
ver um problema sem que previa¬ 
mente alguém introduza, em memória, co¬ 
mandos específicos para este fim. Por es¬ 
te motivo, o intercâmbio de informações 
entre o Homem e a máquina vem se apri¬ 
morando desde o começo da computação 
até hoje. 

Levando em conta que o dialeto enten¬ 
dido pelo computador é extremamente di¬ 
ferente do usado por nós, podemos dizer 
que existem duas maneiras para a comu¬ 
nicação: aprende-se a Linguagem de Má¬ 
quina ou usa-se um tradutor. 

A programação em códigos de máqui¬ 
na se resume na introdução de números 
binários em determinados locais da me¬ 
mória do equipamento. Por este motivo, 
para programar a este nível, é necessário 
conhecer muito bem o hardware utilizado. 
Em código de máquina, os programas se 
tornam difíceis de serem compreendidos, 
assim como para se executar correções. 

Usando um tradutor, a tarefa de progra¬ 
mação fica muito mais simples e agradá¬ 
vel. As linguagens traduzidas são classifi¬ 
cadas em dois tipos: baixo-nível e alto-ní¬ 
vel. 

A primeira assemelha-se muito aos có¬ 
digos de máquina e é difícil de se apren¬ 
der, sendo que seu melhor exemplo é o 
Assembler, que utiliza mnemónicos se¬ 
guidos de operandos. Esta linguagem mu¬ 
da completamente em se tratando de 
CPUs diferentes. O tradutor utilizado por 
ela é denominado Montador e traduz o 
programa-fonte (original) para um progra- 
ma-objeto (códigos binários relativos às 
instruções do programa-fonte). 

As linguagens de alto-nível são facil¬ 
mente assimiladas por se assemelharem 
à humana. Seus tradutores podem ser: in¬ 
terpretadores ou compiladores. 

A linguagem Interpretada mais conhe¬ 
cida é o BASIC, cujo interpretador muitas 
vezes, mas não sempre, se encontra em¬ 
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butido na própria ROM do equipamento. 
Este tipo de tradutor leva o usuário a uma 
espécie de editor interno que permite fa¬ 
zer e alterar c programa com facilidade. 
Quando rodado, o programa é traduzido li¬ 
nha por linha, sendo que é impossível ro- 
dá-lo quando não se tem o interpretador 
na memória. 

Na maioria das linguagens o tradutor é 
0 compilador. A compilação é a obtenção 
de um prog rama-objeto proveniente da 
tradução do programa-fonte, sendo que o 
programa-objeto somente é criado quan¬ 
do nenhuma das regras da linguagem é 
quebrada. Caso isso ocorra, o compilador 
apresenta os erros, exibindo-os no vídeo 
ou na impressora. Normalmente, a sintaxe 
é conferida com base em uma biblioteca 
que complementa o compilador. 

Cada linguagem possui um compilador 
específico a ela, e mesmo as que normal¬ 
mente são interpretadas possuem compi¬ 
ladores. Devemos chamar o programa-ob¬ 
jeto para podermos rodar o programa, já 
compilado, pois dessa forma, ele não ne¬ 
cessitará de nenhum software para ser 
processado. Além de ser auto-suficiente, 
os programas compilados realizam seus 
processamentos com maior rapidez que 
os interpretados. 


Para alteração de programas-objetos 
usa-se “debugs” ou ainda pode-se refazer 
o programa-fonte e compilá-lo novamente. 
Porém, isto causa, em determinados ca¬ 
sos, muitos problemas. 

Muitos compiladores necessitam de 
um “link-editor” para complementar sua 
tarefa. O "link-editor” irá juntar, em um úni¬ 
co programa, as várias partes em que ele 
foi dividido durante a compilação. 

Com essa pequena introdução das lin¬ 
guagens de programação, você poderá en¬ 
trar no universo dos dialetos, onde estima- 
se existirem aproximadamente quatro¬ 
centas linguagens voltadas para diversas 
áreas. 

Para optar por uma delas, é fundamen¬ 
tal fazer uma comparação (das suas vanta¬ 
gens e desvantagens), assim como levar 
em conta as suas diferentes aplicações. 

Desta forma, apresentaremos a seguir 
as principais características das lingua¬ 
gens mais conhecidas e um resumo sobre 
suas histórias. 

Fortran (Fórmula Translation) 

O Fortran, desenvolvido por um grupo 
da IBM em 1955, liderado por Jim Backus, 
é uma das primeiras linguagens de aJto- 
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nível, que visa o processamento de fórmu¬ 
las com uma certa facilidade. 

Pelo fato de ser uma linguagem compi¬ 
lada, tem como característica principal 
seu processamento rápido. 

Pode-se observar a sua utilização em 
grandes indústrias que usam um sistema 
para desenho de peças e posterior fabrica¬ 
ção. Este sistema, conhecido por CAD- 
CAM, foi desenvolvido em Fortran, devido 
à necessidade de se trabalhar com um nú¬ 
mero muito grande de fórmulas. 

A utilização de periféricos e seu manu¬ 
seio é bem simples quando se trabalha 
em Fortran. Para a movimentação de da¬ 
dos e uso de variáveis, existem comandos 
e algumas regras a serem seguidas, por 
exemplo: na movimentação de dados para 
o melo exterior é necessário usar declara¬ 
ções de entrada e saída (1/0), tais como as 
Instruções WRITE, READ e FORMAT. Já 
para especificação de variáveis, é neces¬ 
sário discriminar o seu tipo, que poderão 
ser reais ou inteiras. O computador enten¬ 
de como variáveis inteiras todas aquelas 
iniciadas pelas letras (I, J, K, L, M, N), caso 
contrário serão reais. 

Exemplos de variáveis: 

INTEI ... Variável INTEIRA 
MICRO ... Variável Inteira 
HOBBY... Variável Real 

Qualquer variável em Fortran deve ter, 
no máximo, cinco caracteres. Se por aca¬ 
so ultrapassar este limite, ocorrerá um er¬ 
ro na hora da compilação do mesmo. 

A traduçãq do programa é semelhante 
ao COBOL. É necessário editar, compilar 
e “LINKar” o programa antes de sua exe¬ 
cução. 


Linguagem BASIC 

Chada em 1964 por John G. Kemeny e 
Thomas E. Kurtz (professores da Dart- 
mouth College em Hanover, New Hamps- 
hlre nos EUA), a linguagem BASIC foi Ins¬ 
pirada na linguagem Fortran, para facilitar 
o aprendizado da programação de compu¬ 
tadores e a execução de cálculos mate¬ 
máticos. Atualmente ela é considerada a 
mais popülar e utilizada em todo o mundo. 

Originalmente o BASIC foi disponível 
para minicomputadores e posteriormente, 
seu uso chegou aos microcomputadores, 
onde atualmente estão seus principais 
usuários. Praticamente todos os minis e 
micros dispõem da linguagem BASIC. 

Embora seja uma linguagem potente, o 
BASIC é fácil de se aprender e o objetivo 
de sua criação, para auxiliar o ensino do 
processamento de dados, foi alcançado. 
Com poucas horas de introdução qual¬ 
quer pessoa consegue desenvolver algum 
programa simples. 


O BASIC é uma linguagem interativa e 
de alto-nível, sendo que a maior parte de 
suas versões são Interpretadas, ao invés 
de serem compiladas, apesar de existirem 
compiladores. Isto ocorre devido à facili¬ 
dade oferecida pelos Interpretadores. 

O BASIC não tem uma versão padrão 
universalmente estabelecida, cada fabri¬ 
cante tem desenvolvido sua própria ver¬ 
são de acordo com o hardware dos equi¬ 
pamentos. Com isto torna-se muito difícil 
o conhecimento de todas as suas versões, 
das quais as mais conhecidas e utilizadas 
são: 

— Sinclair; 

— Spectrum; 

— Apple; 

— TRS’80; 

— Microsoft. 

Pode-se dizer então que: o BASIC do 
Sinclair e do Spectrum são voltados aos 
micros pessoais: o do Apple possui ini¬ 
gualáveis recursos gráficos e do TRS-80 e 
0 da Microsoft são voltados para micros 
profissionais. 

O BASIC conseguiu alcançar seu prin¬ 
cipal objetivo e hoje é a mais utilizada lin¬ 
guagem, tanto para o divertimento, como 
para aplicações comerciais. Pode-se dizer 
também que cada versão possui uma ino¬ 
vação, ou seja, algo de novo que expande 
a sua aplicação para as mais distintas 
áreas. 

COBOL (Common Business Oriented 
Language) 

O COBOL, linguagem de alto-nível cha¬ 
da em 1960, visava desde o seu início a 
área comercial, devido as suas inúmeras 
vantagens e fácil manuseio. O COBOL é 
umadas linguagens mais utilizadas em to¬ 
do o mundo. Segundo uma pesquisa reali¬ 
zada nos Estados Unidos, as vagas (em¬ 
prego) oferecidas para programadores 
COBOL superam-se em três vezes mais 
comparando-as com as vagas para todas 
as outras linguagens juntas. Com isto po¬ 
demos notar em que posição o COBOL 
está dentre as linguagens mais procura¬ 
das. 

Por que COBOL?..., esta é uma das per¬ 
guntas que mais são feitas na hora de se 
implantar um sistema de computação: na 
hora de se fazer um programa comercial, 
ou na hora de se estudar uma determinada 
linguagem. Pensando em lhes dar uma 
resposta convincente, apresentaremos al¬ 
gumas das vantagens e desvantagens 
desta linguagem. 

Desvantagens: 

— não existe um padrão definido, dentre to¬ 
das as versões do Compilador COBOL: 



ou seja, um programa feito para uma fa¬ 
mília de computadores não funciona em 
uma família diferente, tendo que serem 
feitas alterações: 

- o prpgrama em COBOL ocupa muito es¬ 
paço de memória, devido a sua auto-do¬ 
cumentação. 

Vantagens:. 

- fácil manutenção: aumentar, diminuir ou 
melhorar o programa: 

- fácil controle de periféricos e de grandes 
quantidades de dados: 

- permite a formatação de relatórios e te¬ 
las, com uma relativa facilidade: 

- o nome dos campos, dos registros e dos 
arquivos, podem ter a extensão máxima 
de 30 caracteres, facilitando, com isso, o 
entendimento do programa e sua docu¬ 
mentação: 

- rapidez no processamento: 

Citadas algumas de suas vantagens e 
desvantagens, podemos ter, agora, uma 
noção do que uma linguagem como o CO¬ 
BOL pode nos fornecer. 

Alguns exemplos de sua aplicação po¬ 
dem ser notados em: folhas de pagamen¬ 
to, controles de estoque, contabilidade, 
etc, campos em que o COBOL pode espe¬ 
cialmente ser utilizado, pois necessitam 
de uma documentação mais rígida e a ma¬ 
nipulação de muitos dados. 

Trabalhando com o COBOL 

a) Divisões de sua programação 

O COBOL é dividido em quatro subdivi¬ 
sões principais, que são: 

1 - IDENTIFICATION DIVISION: esta é a 
divisão de identificação. É através dela 
que podemos saber quem escreveu o pro¬ 
grama: 0 local de seu desenvolvimento: a 
data da compilação: a data em que foi es¬ 
crito 0 programa e os comentários gerais: 

2 - ENVIRONMENT DIVISION: divisão 
de ambiente, ou seja, é nesta divisão que 

í> 
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são especificados os periféricos que se¬ 
rão utilizados e suas características; o 
equipamento em que o programa foi com¬ 
pilado e em qual foi executado; 

3 - DATA DIVISION: divisão de dados, 
responsável pela especificação de todas 
as variáveis e constantes que serão utiliza¬ 
das dentro do programa; 

4 - PROCEDURE DIVISION: divisão de 
procedimentos. A lógica de seu programa 
será desenvolvida nesta divisão. Em ou¬ 
tras palavras, é exatamente aqui que se 
inicia seu programa. 

As três últimas divisões são sub-dividi- 
das em seções, onde em cada uma delas 
são especificadas informações que, se 
não forem comentários, serão linhas de 
comandos que serão executadas pelo 
programa. 

b) Equipamentos e Periféricos 

Para rodar um programa em COBOL é 
necessário possuir um equipamento, co¬ 
mo por exemplo, o TK SOOOlle, uma placa 
de CP/M e uma placa de 80 colunas (que 
pode ser encaixada no equipamento), dois 
disk-drives e uma impressora. Seria inte¬ 
ressante também uma expansão de me¬ 
mória, isto se forem desenvolvidos pro¬ 
gramas mais sofisticados ou profissio¬ 
nais. 

c) Compiiador e LiNKeditor 

Com os equipamentos necessários, 
basta apenas montar seu programa com o 
auxílio de um editor de texto, como por 
exemplo, o WORDSTAR; depois compilá- 
lo e “LINKá-lo” pois, para que o computa¬ 
dor entenda o programa é necessário que 
se traduza o programa-fonte para o progra- 
ma-objeto. Esta é a função do compilador; 
traduzir, divisão por divisão; apresentares 
erros de digitação e posteriormente, unir 
todas as divisões compiladas. E a função 
do LiNKeditor é deixar o programa pronto 
para ser executado. 

O COBOL não é uma linguagem difícil 
deser aprendida, o único problema inicial 
é ter que decorar suas cláusulas e coman¬ 
dos e saber como utilizá-los, mas com um 
pouco de prática e dedicação pode-se su¬ 
perar este obstáculo facilmente. 

Linguagem C 

No inicio da década de 70, Dennis M. 
Ritchie desenvolveu a linguagem C com a 
finalidade de implementar uma das pri¬ 
meiras versões do sistema operacional 
UNIX. Em pouco tempo, Dennis conse¬ 
guiu provar, sem grandes dificuldades, o 
alto padrão da sua criação. .Esta lingua¬ 
gem surpreendia a todos, apresentando 
Importantes características de uma das 
mais bem conceituadas linguagens da 
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época; a linguagem B, que por sua vez teve 
proveniência de outra famosa linguagem 
de sistemas, a BCPL. 

A BCPL foi criada por Martin Richards 
especialmente para a área de sistemas e 
dela vem algumas das mais admiráveis e 
marcantes características da C, tais co¬ 
mo: 0 estilo direto das expressões e a utili¬ 
zação de pointer (apontadores de variá¬ 
veis) e arrays (tabelas) conjuntamente. 

Na tentativa de aprimorar a BCPL, Ken 
Thompson desenvolveu a B, cuja maior di¬ 
ferente em relação a C é o fato de somente 
reconhecer como argumento (variável) có¬ 
digos de máquinas puros, enquanto que a 
C aceita os tipos básicos: caracteres, nú¬ 
meros inteiros curtos e longos, números 
com precisão dupla e números de ponto- 
flutuante. 

Devido ao que herdou, C se tornou uma 
linguagem flexível, de propósitos gerais, 
não sendo específica para nenhuma área 
e nem se restringindo a determinados pro¬ 
cessamentos. Com tudo isto, C conse¬ 
guiu alcançar o título da linguagem mais 
eficiente, para muitas tarefas. 

Possuindo características tanto das lin¬ 
guagens de alto-nível quanto das de baixo- 
nível, ela não se enquadra em nenhum dos 
dois extremos e é considerada por muitos 
como uma linguagem de médio-nível que 
permite a manipulaçao da memória sem 
com isso tornar-se de difícil aprendiza¬ 
gem. 

Os programas em C, desde que escri¬ 
tos na mesma versão da linguagem, po¬ 
dem ser facilmente adaptados para equi¬ 
pamentos diferentes. 

Alguém que queira aprender como pro¬ 
gramar em C deve começar tentando se 
familiarizar com os conceitos básicos da 
linguagem, como: tipos de variáveis, utili¬ 
zação e definição de funções, estruturas 
de controle e expressões de entrada e saí¬ 
da. 

Um programador familiarizado com C 
resolve complexos problemas com pro¬ 
gramas simples, desde que os recursos 
da linguagem não sejam trocados por ví¬ 
cios de programação, característicos de 
programadores de linguagens de alto-ní¬ 
vel. 

C é uma linguagem estruturada, suas 
estruturas de controle foram herdadas da 
BCPL, que por sua vez é uma das mães da 
programação estruturada. As principais 
estruturas de controle que C oferece são: 
IF, para decisões; WHILE e FOR, fazem 
ioopings egm testes no começo ou final 
do conjunto de comandos; e do SWITCH, 
usado para selecionar Lyri caso entre vá¬ 
rios. 

Os programas em C, normalmente, se¬ 
guem a seguinte linha: um programa prin¬ 



cipal acessa funções separadas. Pode-se 
dizer que todos os programas desenvolvi¬ 
dos em C são constituídos de funções 
que pertencem a sua biblioteca ou que fo¬ 
ram definidos pelo programador dentro do 
programa. 

As variáveis podem ser internas ou ex¬ 
ternas. O primeiro tipo faz com que ela 
exista somente dentro de determinada 
função. O segundo tipo pode ser reconhe¬ 
cido pelo programa como arquivo fonte ou 
como variável global pertencendo deste 
modò, a todo o programa e não a uma úni¬ 
ca função. 

Como qualquer outra linguagem, C 
possui defeitos: alguns dos seus operado¬ 
res assumem uma hierarquia errada; sua 
sintaxe poderia ser melhor e suas versões 
apresentam algumas diferenças. 

Finalmente, C pode ser considerada* 
uma linguagem do futuro que está ao al¬ 
cance da maioria dos micros brasilèiros. 
Pode-se afirmar que ela é expressiva e ver¬ 
sátil para uma larga variedade de progra¬ 
mas, sendo também fácil de aprender e de 
usar. 

Logo 

O Logo é mais uma linguagem de pro¬ 
gramação, ou seja, um melo de comunica¬ 
ção entre o usuário e a máquina. É uma lin¬ 
guagem simples por ser de fácil assimila¬ 
ção e também muito poderosa por apre¬ 
sentar recursos sofisticados. Ela vem sen¬ 
do considerada a linguagem ideal para ser 
usada por educadores em um ambiente 
de aprendizado, devido principalmente, 
aoá seus recursos gráficos. 

Esta linguagem pode ser ensinada para 
pessoas de qualquer idade não havendo a 
necessidade de conhecimentos de mate¬ 
mática e nem de programação. 

Seu aprendizado é muito simples, diver¬ 
tido, e ao mesmo tempo permite, aos mais 
experientes, a realização de programas 
bem sofisticados. 
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Apesar de ser fácil as crianças progra¬ 
marem em Logo, não significa que ela seja 
uma linguagem infantil. 

O Logo apresenta uma estrutura proce- 
dural, isto significa que podemos cons¬ 
truir procedimentos, formados de uma ou 
mais instruções, podendo ser comandos 
primitivos do próprio Logo ou outros pro¬ 
cedimentos. 

Tanto os comandos primitivos do Logo 
quanto os procedimentos criados pelo 
usuário, são utilizados da mesma forma 
não havendo uma discriminação. 

Por ser uma linguagem flexível, esta 
permite que você crie ou modifique os 
procedimentos sem maiores dificuldades. 

A parte gráfica do Logo produz resulta¬ 
dos visuais imediatos, dando um estímulo 
ao usuário para pesquisar ainda mais a 
fundo este terreno. 

Para que o Logo execute as instruções 
fornecidas pelo programador, estas de¬ 
vem estar numa forma que possa ser reco¬ 
nhecida pelo Logo. 

Quando usamos esta linguagem so¬ 
mente para escrever, dizemos que esta¬ 
mos usando a “tela de texto” No caso de 
estarmos desenhando estaremos utilizan¬ 
do a “tela de desenho”. 

Para ser feito qualquer tipo de figura 
nesta linguagem, é^necessário que o 
usuário forneça todas as informações a 
respeito do desenho que se pretende exe¬ 
cutar. 

Depois que um procedimento está defi¬ 
nido, ele pode ser usado como qualquer 
outro comando, no modo direto ou.fazen- 
do parte de outros procedimentos, cha¬ 
mamos isto de “subprocedimentos”. 


Pascal 

O desenvolvimento da linguagem Pas¬ 
cal foi baseado em dois objetivos princi¬ 
pais: 

1. que esta fosse uma linguagem própria, 
e que no ensino de programação se 
comportasse como uma matéria siste¬ 
mática, baseando-se em alguns concei¬ 
tos fundamentais: 

2. que suas implementações, fossem con¬ 
fiáveis e eficientes. 

O resultado foi uma linguagem ampla¬ 
mente estruturada, com poucos concei¬ 
tos fundamentais, sendo assim, fácil de 
aprender. 

As características mais importantes do 
Pascal são: a grande facilidade na estrutu¬ 
ração dos dados: a possibilidade do pro¬ 
gramador definir seus próprios tipos de 
escala, além dos tipos-padrão oferecidos 
pela linguagem: e um completo conjunto 
de comandos estruturados. 


Os comandos da linguagem Pascal são 
classificados em dois tipos básicos: 

a. comandos simples 

b. comandos estruturados 

Em geral, um programa de computador 
consiste em duas partes: 

- uma seção de definição: 

- uma seção de instrução. 

Na maioriadas linguagens de computa¬ 
dor, a seçao definição é misturada com a 
seção de Instrução, o que pode dar a Im¬ 
pressão de que o programa consiste de 
uma longa lista de instruções. 

Pascal, contudo, separa as duas se¬ 
ções muito claramente e isto é uma carac¬ 
terística importante de qualquer programa 
escrito em Pascal. 

Todos os programas Pascal tomam a 
seguinte forma: 

PROGRAM nome 
definições 
BEGIN 

instruções 

END 

Esta é uma linguagem de alto nível, e 
antes que um programa escrito em Pascal 
possa rodar em um computador, ele deve 
sertraduzidoparacódigo de máquina. Isto 
é, um programa Pascal envolve ao menos 
três operações: 

- o programa deve ser introduzido no com¬ 
putador como texto: 

- deve ser compilado para código de má¬ 
quina: 

- rodado posteriormente, com o computa¬ 
dor passando a obedecer suas instru¬ 
ções. 

Podemos visualizar este processo, co¬ 
mo: 


programa escrito no papel 
Editor 

programa texto no computador 
Compilador 

I 

programa na forma de código de máquina 
programa armazenado e rodando 

De forma diferente do BASIC, o Pascal 
não é normalmente fornecido com um pa¬ 
drão característico, na maioria dos micro¬ 
computadores. Isto significa que, antes 
que possa começar a aprender ou usar o 
Pascal, você deve escolher e comprar uma 
versão da linguagem, que sirva em sua 
máquina. 



Conclusão 

Todas as linguagens de programação 
existentes possuem defeitos e qualida¬ 
des, cada uma é específica para uma de¬ 
terminada área e desenvolvida para um 
determinado equipamento, sendo poste¬ 
riormente, adaptada para outros. 

Quando fazemos opção por uma delas, 
devemos ter em mente a sua aplicação e 
se as condições para seu uso são ideais, 
pois se não forem jamais o programador 
conseguirá desfrutar de suas vantagens. 

Lembre-se: cada caso é um caso e o 
que é bom para um equipamento ou apli¬ 
cação pode ser ruim para outro. Por isso 
analise bem antes de escolher a sua lin¬ 
guagem de programação. ^ 


Tente Esta! 
TK-85 


Í0 

INPÜT 

H$ 



20 

FÇR I: 

= i Tü 

L5N 
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PkINT 

HT 10 

ü 16 - 

-LEN 

l$./2 

; P$ (!' 

TG j ; 

p;$ 


Tü 

I) 
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PPU5E 
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4-0 

N5XT 

I 
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SISTEMA OPERACIONAL 


CP/M 


Há dez anos atuando como 
Sistema Operacional padrão. 


Elaine Kelly Lima 


E m 1976, enquanto Wozniak aperfei¬ 
çoava o Apple II um outro america¬ 
no chamado Gary Kildall colocou 
no mercado um produto que mudaria os 
conceitos sobre sistemas operacionais 
para microcomputadores: o CP/M. 

O Control Program for Microcompu- 
ferteve sua versão mais rudimentar de¬ 
senvolvida em 1975 durante um período 
de trabalho experimental, que Kildall fazia, 
com a PL/M para a empresa onde era pro¬ 
gramador, a Microcomputers Application 
Associates (MAA). Ao verificar o impacto 
que sua criação estava causando ele pe¬ 
diu demissão da MAA e fundou, no mes¬ 
mo ano, a Digital Research Inc., que até 
hoje é responsável pela comercialização 
do sistema. 

Quando foi lançado definitivamente no 
mercado, o CP/M explorou uma fatia do 
mercado que até o momento permanecia 
intacta e mesmo assim, em pouco tempo, 
Kildall conseguiu transformar seu produ¬ 
to em “padrão” para os micros profissio¬ 
nais, sendo que esta fama mantém-se até 
hoje graças a sua eficiência e potenciali¬ 
dade. 

Atualmente, a maioria dos equipamen¬ 
tos oferecem aos seus usuários, além do 
próprio sistema operacional, uma versão 
do CP/M. Porém, para carregá-lo, o micro 
precisa preencher determinados requisi¬ 
tos e ter a seguinte configuração mínima: 
memória principal de 48 Kbytes: um mi¬ 
croprocessador Z80, 8080, 8086 ou 8088; 
um terminal (teclado e monitor); e um drive 
para disquete de 5 1/4” ou 8 polegadas. 

Apesar dos compatíveis com o Apple 
processarem sob o 6502, pode-se acoplar 
uma placa de Z80 que possibilita a utiliza¬ 
ção do CP/M. Para que essa conexão seja 
feita é necessário que o micro apresente 
um Slot específico à essa função, tal qual 
o TK 3000 lle. 

Além de ser um sistema operacional 
muito flexível e fácil de trabalhar, o CP/M 
possui uma quantidade Incontável de pro¬ 
gramas compatíveis ou adaptáveis. 

Apresentando o CP/M 
Antes de mostrarmos o.seu modo de 
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operação, vamos fazer uma rápida descri¬ 
ção da sua estrutura interna. Veja a figura 
1 . 

FIGURA 1 

Basic INPUT/OUTPUT System 
(BIOS) 

Sistema básico de entrada e saída 

Basic Disk Operating System 
(BDOS) 

Sistema básico de operação de discos 

Console Commands Processor 
(CCP) 

Processador de comandos da console 

Transiente Program A^ea 
(TPA) 

Area de programa transiente _ 

Página 0 

ESTRUTURA DA MEMÓRIA SOB O CP/M 


Na estrutura mostrada na figura 1, po¬ 
demos considerar como parte integrante 
do sistema os BIOS, BDOS e CCP. O pri¬ 
meiro é responsável pela interação soft¬ 
ware/hardware e sua função é associar os 
dispositivos lógicos aos físicos. O segun¬ 
do é quem realiza todas as manipulações 
com 0 disquete, tanto para acesso como 
para organização e alocação de arquivos 
na unidade física. A CCP é a parte que in¬ 
terpreta os caracteres pressionados pelo 
usuário no teclado. 

A área de programa transiente é o local 
da memória onde os programas são carre¬ 
gados para que possam ser executados e 
controlados pelo CP/M. É bom observar 
que o endereçamento de inicio da CCP, 
BDOS e BIOS, depende do tamanho da 
memória do equipamento utilizado. 

Nos micros que aceitam CP/M algu¬ 
mas teclas são fundamentais: 

- a tecla que permite executar comandos e 
i r para a próxima linha pode ser encontra¬ 
da nos diversos equipamentos com os 
seguintes nomes: RETURN, ENTER, 
NEW LINE, CR, etc; neste artigo, ela será 
indicada por (CR); 

- a tecla de controle é fundamental e talvez 
seja a mais importante,Em nosso artigo 
ela será representada por □ eé encon¬ 
trada nos diversos micros com os se¬ 
guintes nomes: CONTROL, CTRL, 
CNTL, ALT etc. 

Por ser um sistema operacional arma¬ 
zenado em disquete, será carregado na 
memória quando o equipamento acessar 
para leitura, um disquete que tenha nas 
suas duas primeiras trilhas o sistema gra¬ 
vado. E a parti r daí, o CP/M passa a contro- 
lar todas as operações, sendo que o 
prompf apresentado por ele indica o drive 
default que normalmente é A > . Isto sig¬ 


nifica que em todos os comandos cujo dri¬ 
ve de acesso não é especificado, o siste¬ 
ma reconhecerá o A:. Caso o usuário quei¬ 
ra mudar, temporariamente, o drive de¬ 
fault 0 procedimento a ser seguido é mui¬ 
to simples: 

A > B: <CR> 

B > 

Como você pode observar, bastou indi¬ 
car 0 drive, que neste sistema sempre é 
uma letra de A até P, seguida de dois pon¬ 
tos. 

Trabalhando com o CP/M 

Além dos comandos executáveis, es¬ 
tando apenas com o sistema em memória, 
oCP/M também possui uma grande quan¬ 
tidade de programas transientes que fun¬ 
cionam como utilitários. Esses programas 
desempenham distintas funções, tais co¬ 
mo: copiar, editar e depurar arquivos: for¬ 
matar e gerar o sistema em disquetes: for¬ 
necer informações sobre unidades de en¬ 
trada e saída (disquetes ou arquivos); exi¬ 
bir no formato hexadecimal o conteúdo de 
arquivos: converter programas fonte em 
Assembler para hexadecimal e vice-versa: 
executar seqüência de comandos do sis¬ 
tema gravados previamente em arquivos: 
etc. 

Ao nomearmos um arquivo neste siste¬ 
ma, devemos prestar atenção à sua sinta¬ 
xe, pois ele é formado por um prefixo e um 
sufixo separados por um ponto. O prefixo 
pode ter no máximo oito caracteres e o su¬ 
fixo três, sendo que o primeiro representa 
o nome dado e o segundo indica o tipo. 
Para formação dos nomes são caracteres 
inválidos: < > .,;: = ?( )/[ ] e os caracteres 
especiais utilizados em comandos são: ? 
queindicaqualquercaractere:e *queindi- 
ca qualquer string. 

Para conhecer os tipos mais comuns 
de sufixos observe a tabela 1. 


TABELA 1 


TIPO 

REPRESENTAÇÃO 

.ASM 

Programa fonte em Assembler. 

.BAS 

Programa fonte em BASIC. 

.CMD 

Program fonte DBase. 

.COB 

Programa fonte em COBOL. 

.FOR 

Programa fonte em Fortran. 

.PAS 

Programa fonte em Pascal. 

.PU 

Programa fonte em PL/I. 

.COM 

Programa transiente executável. 

.REL 

Programa relocável em 

Linguagem de Máquina. 

.OBJ 

Programa em.código objeto. 

.$$$ 

Arquivo temporário, inútil 
ou mal gravado. 
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Exemplos de nomes de arquivos: 

PROGRAMA.COB ARQUIV01 TXT 

PIP.COM ED.COM 

PROG234.ASM MEMO02.COM 

F88.REL M M DDAA86.CM D 

Uma ótima característica apresentada 
pelo CP/M é a de permitir ao usuário utili¬ 
zar além dos comandos e programas tran¬ 
sientes, uma série de controles que facili¬ 
tam muito a vida do operador. Para conhe¬ 
cê-los, observe a tabela 2. 

TABELA 2 


TECLAS 

FUNÇÃO 

-c 

Informa ao equipamento que o 
disquete foi trocado. 

- E 

Pula para o inicio da linha 
seguinte, permitindo ao operador 
prosseguir a lista de comandos. 

- H 

Volta um caractere, apagando-o. 

- J 

0 mesmo que RETURN. 

- M 

0 mesmo que RETURN. 

- P 

Aciona e desaciona a impressora. 

- R 

Repete linha corrente. 

- S 

Provoca parada temporária de 
dispiay no vídeo e na impressora. 
Qualquer tecla continua. 

- U 

Vai para a linha seguinte, 
cancelando a atual. 

-X 

Apaga a linha corrente retornando 
ao seu inicio. 

-Z 

Finaliza entrada pela console. 

EI indica tecla de controle; CONTRO. CRTL, CNTL, ou ALT. 


Obs.: A tecla de controle deve ser pressionada ao mes¬ 
mo tempo que a letra, para que haja o retorno desejado. 


Agora que já sabemos nomear arqui¬ 
vos, mudar o drive default e as teclas de 
controle do CP/M, vamos aos comandos 
principais que somarfi um total de seis, e 
são muito importantes para quem deseja 
operar 0 CP/M. 

DIR -lista 0 diretório do disquete, ou se¬ 
ja, exibe o nome dos arquivos. 

Formato: DIR (drive:) (nomearq.tip) CR 

Sendo que, no formato apresentado, o 
nome do arquivo e o drive são parâmetros 
opcionais. 


EXEMPLO 

FUNÇÃO 

A >DIR <CR> 

Exibe 0 nome de todos os arquivos 
do drive A: 

A >DIR B; <CR> 

Exibe 0 nome de todos os arquivos 
do drive B:. isso ocorre sem que o 
drive default seja mudado. 

A ) B: <CR> 

B > DIR <CR> 

Exibe todos os arquivos do drive 

B;, deixando como drive default o 

B; 

B > DIRVCOB <CR > 

Exibe 0 nome de todos os arquivos 
do drive B; com sufixo .COB. 


TYPE - Exibe o conteúdo de arquivo 
gravado no formato ASCII, no vídeo ou im¬ 
pressora. 

FORMATO: TYPE (drive:) (nomearq.tip) 
(âP) CR. 

Sendo que âP deve ser pressionado so¬ 
mente se houver a necessidade de acionar 
a impressora. 


EXEMPLO 

FUNÇÃO 

A >TYPE B.PROG.TXT <CR> 

Exibe no vídeo o conteúdo 
do arquivo PROG.TXT que 
está no drive B: 

A >TYPE PR2.FORâP <CR> 

Exibe no vídeo e lista na 
impressora.o conteúdo do 
arquivo PR2.FOR que está 
no drive A: 


REN - Renomeia arquivos. 

FORMATO: REN (drive:) (nomenovo.tip) 
= (drive:) (nomevelho.tip) <CR> 

Sendo que, se forem especificados dri¬ 
ves diferentes será detectado erro. 


EXEMPLO 

FUNÇÃO 

A> REN B;NOVOCOB = B: 
VELHO COB < CR > 

Procura no drive B: o arquivo 
VELHO.COB e muda seu 
nome para NOVO.COB. 


ERA - deleta arquivos do disquete. 
FORMATO: ERA(drive:)(nome.tip) (CR> 


EXEMPLO 

FUNÇÃO 

A> ERA B:*.TX7 <CR> 

Deleta no drive B: todos os 
arquivos com sufixo .TXT. 

A> ERAV* <CR^ 

Provoca a pergunta: ALL (Y/N)?, 
se a resposta for Y o disquete 
que está no drive A: terá todos 
os seus arquivos apagados. 

A> ERA PROG.* <CR> 

Apaga do drive A: todos os 
arquivos com prefixo .PROG. 

A>ERA P???.FOR <CR> 

Apaga do A: todos os arquivos 
que comecem com a letra P. 
tenham quaisquer dos três 
caracteres, e cujo sufixo seja 
.FOR. 


SA\/E - Grava no disquete o conteúdo 
da memória a partir do endereço 100H. 
FORMATO: SAVE n (drive:) nome.tip CR 
Sendo n o número de blocos de 256 
bytes a serem gravados. Neste comando, 
o nome do arquivo e n devem ser determi¬ 
nados pelo operador, obrigatoriamente. 


EXEMPLO 

FUNÇÃO 

A>SAVE 4 B:TRAB.COM<CR 

Será gravado no arquivo 
TRAB.COM no B: o bloco 
de memória entre 100H 
e4FFH. 

A>SAVE 7 ARQUIVO.COM <CR> 

0 bloco de memória entre 
100H e 799H é gravado no 
AARQUIVO.COM. 


USER - Altera o número do usuário cor¬ 
rente. 

FORMATO: USER n 
Sendo n um número inteiro entre 0 e 15 
inclusivç, o default é 0. 


EXEMPLO 

FUNÇÃO 

A>USER5<CR> 

0 usuário corrente agora é o 5. 


A partir deste artigo traremos, em todas 
edições, futuras dicas e usos para os pro¬ 
gramas transientes desse fantástico sis¬ 
tema operacional. <3> 


GUARDE ESTE NUMERO; 




É onde você encontra tudo para 
os micros da linha TK. 

• SOFTWARE (Jogos e Aplicativos) 

• ACESSÓRIOS 
• PERIFÉRICOS 
• LITERATURA 

• E O NOVO TK 90X - MICRODIGITAL 

0 micro 
pCheio de 
programas. 

, inpnc p APi iPATiunc OBERTRDn 
> JOGOS E APLICATIVOS s o f t w r e 



> APLICATIVOS EM FITA E oisco Microidéia 


PASSE SEU PROGRAMA EM FITA SEM 
PROBLEMAS UTILIZANOO A INTERFACE LH-3. 

FILTRO DE CONTROLE AUTOMATICO (SCA) PARA 
LEITURA E GRAVAÇÃO DE PROGRAMAS EM FITA 

TECNISERVICE 


FAÇA 0 CURSO DE BASIC NA MELHOR ESCOLA OE S. PAULO 


O 


MfiGMODfiTfi 

informática Itda. 


Av. Paulista, 2644 8* cj. 86 
01310 São Paulo SP 


PROTEJA 


O seu 


mcRoconpuTfmR 


COM FILTRO DE 
LINHA 



ruído eletrico 


contra INTERFERÊNCIA: 

RÁDIO FREOÜÉNCIA (RF) 




pnntra ^/cos de voltagem 

Ibi transientes de tensão 


irL/Xi 


POTÊNCIA: ATINGE ATÊ 1,5 KVA 


ZENTRANX 

Rua Senador Flaquer, 376/386 
Santo Amaro - CEP 04744 
Telefone 522-2411 — Sérgio 
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Editor 

Hexadecimal 
para o TK-85 

Dirceu Teixeira 


T odos nós, usuários do TK-85, sabe¬ 
mos como é cansativo o processo 
de introdução de programas em Lin¬ 
guagem de Máquina; sempre tendo que 
digitar um programa em BASIC para a in¬ 
trodução dos códigos em decimal ou em 
hexadecimal. 

Foi pensando muito nisto que desen¬ 
volvi este programa, visando facilitar a di¬ 
gitação dos programas em forma de códi¬ 
gos hexadecimais. Como o próprio nome 
diz, ele trabalha em hexadecimal, mas co¬ 
mo a maioria dos programas sempre apre: 
senta o endereço inicial em decimal, mos¬ 
trarei, logo mais, como converter os ende¬ 
reços em decimal para hexadecimal. 

Agora, darei uma explicação dos co¬ 
mandos do editor. 

comando *‘B”-este comando tem, co¬ 
mo função-, abandonar o editor, retornan¬ 
do ao BASIC. 

comando '"C”- sua função é apenas a 
de enviar à impressora uma cópia do que 
estiver na tela do micro. Para aqueles que 
não possuem impressora o comando fará 
apenas a imagem pular. 

comando “E"- este é o comando prin¬ 
cipal do editor e sua função é de dar entra¬ 
da aos códigos hexadecimais. Ao contrá¬ 
rio dos programas em BASIC, não será ne¬ 
cessário digitar NEW LINE após cada có¬ 
digo, pois o comando faz isso automatica¬ 
mente. 

No início do comando lhe será solicita¬ 
do 0 endereço inicial do programa. Feito 
Isto, logo em seguida o programa pede a 
confirmação do endereço, bastando para 
isso, digitar “S” ou “N”. Confirmado, o sis¬ 
tema imprimirá o endereço em hexadeci¬ 
mal e, a partir daí, é só digitar os códigos. 

O comando formata cada linha com se¬ 
te bytes e a soma sintática de cada linha. 
Na última linha, o comando imprime a se¬ 
guinte mensagem: “pressione STOP para 
menu”. 

Teclando-se STOP o comando é "abor¬ 
tado”, imprimindo a soma sintática da li¬ 
nha digitada. Caso você tenha digitado 
meio byte (apenas um dígito hexadecimal) 
esta Instrução será ignorada. 

Sevocêdigitarum código errado, utilize 
os seguintes processos para correção: 

1. tome nota do endereço da linha, para 
correção no final do programa e digite 


tooa a linha novamente. 

2. tecle STOP para retornarão menu, entre 
novamente no comando "E”, fornecen¬ 
do, como endereço inicial, a linha que 
apresenta o erro e reinicie a digitação a 
partir daí. 

comando “L”-este comando faráuma 
listagem de um bloco da memória, digi; 
tando-se o endereço inicial e a quantidade 
de bytes a serem listados: a listagem será 
apresentada no mesmo formato do co¬ 
mando “E”. 

No caso de se digitar a quantidade de 
bytes errados, você deve interromper a im¬ 
pressão, pressionando novamente a tecla 
“L” para continuar listando, ou então, re¬ 
torne ao BASIC e digite POKE 16507,0 e 
em seguida, volte ao editor e recomece 
novamente sua listagem, fornecendo 
RAND URS 30726, NEW LINE. 

comando “R”-es\e é o último e mais 
poderoso dos comandos, sua função é 
criar uma linha REM de tantos bytes quan¬ 
tos forem informados no início do mesmo. 
Este comando possui um sistema de pro¬ 
teção de linhas muito poderoso, veja co¬ 
mo esta proteção funciona; nós sabemos 
que, quando temos uma linha com mais 
de 7CX) bytes e a primeira linha imediata¬ 
mente abaixo desta for deletada, o micro 
entra num sistema de “loop” infinito que 
só parará com o desligamento do equipa¬ 
mento. 

Esta proteção cria uma outra linha 
REM, quando o tamanho da primeira for 
maior que 512 bytes, com a seguinte men¬ 
sagem: “não deiete esta linha”. 

Estes são os cinco comandos utiliza¬ 
dos pelo programa. 

Conversão de endereço decimal para 
hexadecimal 

1. devemos “quebrar” o endereço em dois 
bytes, dividindo-o por 256. Pegando a 
parte inteira obteremos o byte mais sig¬ 
nificativo do endereço; 

2. multiplicaremos este valor por 256 e o 
resultado devemos subtrair do endere¬ 
ço fornecido inicialmente obtendo as¬ 
sim, o byte menos significativo. 

Veja como seria, na prática: 

' 16514/256 = 64 (byte mais significativo) 
64*256= 16384 

16514-16384 = 130 (byte menos signlfica- 
*tivo) 

Para conferir se a operação está corre¬ 
ta, basta fazer o seguinte; 

130 + 256*64 isto deverá ser igual a 16514 
Para obter o endereço em hexadecimal 
devemos fazer, agora, a conversão de ca¬ 
da um desses números da seguinte ma¬ 
neira: 

1. dividir os números por 16 e pegar so¬ 
mente a parte inteira: 


64/16 = 4 (1.® dígito) 

64-(4*16) = 0(2.® dígito) 

130/16 = 8(3.® dígito) 

130-(8*16) = 2(4.® dígito) 

O resultado em hexadecimal será 4082. 
Prestando bastante atenção, o proces¬ 
so é igual ao descrito anteriormente, a úni¬ 
ca diferença é que, em vez de dividirmos 
por 256, nós dividiremos por 16,queéaba- 
se hexadecimal. 

Caso os dígitos estejam entre 10 e 15 
estes valores serão substituídos por le¬ 
tras, conforme o esQuema abaixo: 

10 = A 

11 = B 

12 = C 

13 = D 

14 = E 

_ 15 = F _ 

Para fixar bem o processo de conver¬ 
são, vamos a um outro endereço que use 
letras. 

Vamos converter o endereço 18987; 

1. ® passo 18987/256 = 74 (parte inteira) 

2. ® passo 18987-256*74 = 43 

3. ® passo 74/16 = 4 (parte inteira) 

4. ® passo 74-(16*4) = 10 = A (conforme 

esquema) 

5. ® passo 43/16 = 2 (parte inteira) 

6. ® passo 43-(16*2) = 11 = B (conforme 

esquema) 

O resultado final será 4A2B. 

Bem, terminada as explicações de co¬ 
mo converter endereços decimais para 
hexadecimais, vamos para o programa. 
Afinal, este é o objetivo do artigo. 

Crie uma linha REM de 1.085 bytes. Pa¬ 
ra isto, utilize o programa gerador de linha 
REM, publicado na edição número 7 da 
Microhobby. 

InicialiTiente, digite o programa 1 (a li¬ 
nha REM deve ter 96 pontos). 

Tecle RUN e digite os números deci¬ 
mais da listagem 1. 

Depois de digitar todos os códigos, pe¬ 
ça ao computador para mostrar a lista¬ 
gem. Por meio de um LIST, esta deverá es¬ 
tar conforme o programa 2. 

Retire as linhas 2a8edlgiteas novas li¬ 
nhas do programa 3. 

Rode o programa, a seguir digite 0 com¬ 
primento que a sua linha REM deveria ter. 

Depois de criada a linha REM, “deiete” 
a linha 1 e a linha 4 em diante. Logo-após, 
digite POKE 16510,0 e 1 REM e a seguir 
“deiete” a linha 3. 

Agora digite o programa 4, que fará a 
entrada dos endereços da listagem 2. 

Digite apenas sete bytes por vez, sepa¬ 
rados por um espaço. Após a apresenta¬ 
ção de cada linha será apresentada a so¬ 
ma sintática, onde você poderá conferir 
com a soma da listagem. No caso da so¬ 
ma estar errada, digite “ERRO” interrom- 
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pendo 0 programa, e reedígite a linha. De¬ 
pois de tudo “delete” todo o programa, 
menos a linha 1, e digite o programa 5, gra¬ 
vando antes de executar o mesmo. 

Para rodar o programa, você deve dar 
um RAND USR 30726, porque este foi de¬ 
senvolvido para trabalhar acima da RAM 
TOP. 


i REh 


2 FOR 1=16514 TO 16609 

3 SCROLl 

4 RRINT I; = _ ; 

5 INRÜT X' 

6 RRINT X 

7 POKF I .X 

8 NEXT I 


1 REH lN 7-^*^ EliRND Fh 5T 
•"EDRNDxí:::ÕDRND5£RNDY:«..?7?STR$ FOR 

FOR ‘"•F?77XC*5GN ./ INPUT LPRINT 
FfiST * LLIST RNDl GOSUB PI?? LPR 
INT GOSUB §5 STOP RNDQ 70 •TRT * 
?7?70 REM "”7)® FOR ; FOR O. GO 
SUB ÍgG?OLN F?TRn 

2 FOR 1 = 16514 TO 16609* 

3 SCROLL 

4 PRINT 1;",.“; 

5 ir-4PUT X' 

6 PRINT X 

7 POKE I ,X 
S NEXT I 


1 REM * LN EfcRND FfiST ss? 

E D R N D:sis6 D R N D 5 £ R N D Y;«4? 7 ? ST R $ F O R ;•?::> 
FOR ?F?77XC“SGN /""iNPUT LPRINT 
FfiST ■ LLIST RNDl GOSUB PI?? LPR 
INT GOSUB 15 STOR RNDQ 70 *7fiT * 
?7?70 REM ■■“73- FOR ; FOR O, GO 
SUB Í20''0LN F?TflN 

3 P RINT ■ ■ C O M PRIME NTO Dfi R E M : ‘' 

4 INPUT 0 

5 PRINT 0 

6 PfiUSE 60 

7 POKE 16514,0-256*INT (0/255 

S POKE 16515,INT (0/256) 

9 hRNl^ u 6R 16bl6 

10 CL5 

11 LIST 2 


10 

LET fi$ = ^^^^ 


20 

LET EN = 165Í4. 


30 

IF fi$ = ‘^'- THEN 

LET 58=0 

40 

IF fi$="“ THEN 

SCROLL 

50 

IF «$ = ■■'■ THEN 

PRINT ENi “ 

60 

IF fi$ = —' THEN 

INPUT R$ 

70 

IF fií=“ERR0“ THEN GOTO ISO 

80 

LET X=1S*C0DE 

fi$(l)*C0Dt fi$ 

1 H — ■ 

4-76 


90 

PRINT fi$( TO 2 

)■" ■'; 

100 

POKE EN., X 


105 

i_ E T o D = i- b * .>( 


110 

LET fiÍ=fii(-4. TO 

) 

120 

LET EN=EN-!-1 


130 

IF fl$ = "‘^ THEN 

PRINT " “.iSS 

140 

GOTO 30 


150 

LET fi$ = ‘'^‘ 


160 

LET EN=EN-7 


170 

GOTO 30 




16514.. 0 

16515.. 0 

16516.. 205 

16517.. 35 

16518.. 15 

16519.. 1 

16520.. 6 

16521.. 0 

16522.. 42 

16523.. 130 
16b24,,64 

16525.. 229 

16526.. 9 

16527.. 68 
16b28,,77 

16529.. 42 

16530.. 41 

16531.. 64 

16532.. 9 

16533.. 34 

16534.. 41 

16535.. 64 

16536.. 33 

16537.. 12 
16b38,.64 

16539.. 62 

16540.. 9 

16541.. 94 

16542.. 35 

16543.. 86 

16544.. 213 

16545.. 235 


16545.. 9 

16547.. 235 
16548, ,-114 
16b49,,43 

16550.. 115 

16551.. 35 

16552.. 35 

16553.. 61 

16554.. 40 

16555.. 3 

16556.. 209 

16557.. 24 

16558.. 238 

16559.. 22b 

16560.. 229 

16561.. 1 

16562.. 22b 

16563.. 64 

16564.. 167 

16565.. 237 
16b66,,66 

16567.. 68 
16b6S, = 77 

16569.. 225 

16570.. 237 

16571.. 184 

16572.. 33 

16573.. 227 
16b74,,64 

16575.. 54 

16576.. 0 

16577.. 35 


16578.. 54 

16579.. 2 

16580.. 35 

16581. . 193 

16582.. 3 

16583. . 3 

16584. . 113 

16585 .. 35 

16586. . 112 

16587.. 35 

16588.. 54 

16589.. 234 

16590.. 11 

16591. . 11 

16592.. 35 

16593. . 17 

16594. . 1 
16595, ,0. 

16596.. 235 

16597. . 25 

16598 .. 235 

16599. . 54 

16600. . 27 
16601=.237 

16502 .. 176 

16603.. 54 
L6604,,117 
.16605, ,52 

16606.. 20b 

16607. . 43 
»1 6 6 0 8 , =15 
16b09,,201 
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Desenhando com 
o teclado 

Solte sua criatividade 
e divirta-se fazendo figuras 
e gráficos no TK 2000. 


Fernando Carvalho Filho 


E ste programa, desenvolvido para o 
TK-2000, torna o vídeo do seu equi¬ 
pamento uma tela reservada a dese¬ 
nhos que serão feitos por você sem a utili¬ 
zação de lápis ou pincéis, mas através do 
teclado ou do joystick. Além de explorar a 
criatividade do usuário divertindo-o, o pro¬ 
grama poderá revelar em você, uma apti¬ 
dão muito especial e às vezes, desconhe¬ 
cida. 

Através da apresentação de um menu 
Inicial, o programa informa quais são as 
teclas de controle. Para traçar pontos que 
sobem, descem, que vão para direita ou 



ainda para esquerda deve-se pressionar as 
setas do teclado, respectivas ao movi¬ 
mento desejado. Para desenhar na diago¬ 
nal use: 

A - esquerda para baixo; 

S - direita para baixo; 

Q - esquerda subindo; 

W- direita subindo. 

Se por acaso alguma linha for desenha¬ 
da de forma erra, você poderá apagá-la 
pressionando a letra C. Após pressionar 
esta letra será necessário passar nova¬ 
mente sobre as posições que você deseja 
apagar e, desta maneira, obter o satisfató¬ 
rio. Para prosseguir com o desenho, pres¬ 
sione novamente C, caso contrário, o 
HCOLOR continuará igual a zero e nada 
será exibido. 

O programa oferece ainda, rotinas es¬ 
peciais para leitura e gravação da figura. 
Além disto, ao estar no modo gráfico, você 
poderá retornar ao menu sem perder o de¬ 
senho, através das teclas: M (va\ para o 
menu) e D (vai para o desenho). 

Caso você queira parar o programa, o 
desenho será perdido. Para voltar a rodá-lo 
basta pressionar as duas teclas RESET 
juntas, já que o programa ao ser rodado 


pela primeira vez, joga na memória do 
equipamento uma rotina de máquina que 
força essa situação. 

Para facilitar o entendimento da estru¬ 
tura do programa colocamos a seguir, 
uma tabela de suas rotinas: 


Tabela de Rotinas 

Unhas 

Função 

6a8 

Rotina jogada na memória para pro¬ 
vocar RUN automático, ao serem 
pressionadas as teclas RESET. 

9a 10 

Prepara a tela para o desenho. 

12a50 

Apresenta o menu. 

55 a 105 

Leitura do teclado. 

125 a 250 

Endereço das rotinas e valores do 
HPLOT. 

500 a 650 

Consistência dos valores do H PLOT. 

1000 a 1020 

Exibição na tela. 

1200 a 1220 

Limitações do HPLOT. 

1500a 1560 

Define a cor do ponto. 

2000 a 2550 

Fim do programa. 

3000 

Prepara rotinas de leitura e gravação 
de desenhos. 

4000 a 4080 

Rotina de gravação de figuras. 

5000 a 5080 

Rotina de leitura de figuras. 

6000 a 6030 

Entrada do nome do desenho. 


5 REh DESENHANDO 

6 DATA Í69,Í23,Í4Í,242,3 
,169,200,Í4Í, 

243,3,32,ií6,251,96 

7 FOR I = 768 TO 7815 RE 
AO BYTE: POKE 

I,BYT£: NEXT 

8 CALL 768 

9 MA 5 TEXT : IIP : HGR2 
: COLOR = 3 

10 FOR I = 0 TO 45: HLIN 
0,39 AT l: NEXT 

12 MA 

15 VTAB i: HTAB 14: PRIN 

T "B12/06/198 

6F" 

20 OTAB 3: HTAB 12: INOE 
RSE : PRINT 

FAZENDO DESENHOS": NORMAL 

25 A = 139:B = 96:F = 3;C 
= 0 

35 VTAB 5: PRINT '^MENU* 
// 

37 PRINT "<H>—>HENU" 


38 PRINT "<D>—>DE3ENK0 

/f 

39 PRINT "ÍO—>APAGA A 
LINHA DESENH 

ADA" 

40 PRINT "<A>—•)DIAGÔNA 
L ESaUERDA P/ 

BAIXO" 

41 PRINT "<S>—IDIAGONA 
L DIREITA P/ 

BAIXO" 

42 PRINT "<Q)—>DIAG0NA 
L ESQUERDA P/ 

CIKA" 

43 PRINT "<y>— JDIAGONA 
L DIREITA P/ 

CIMA" 

44 PRINT "«-)--)ESQUERD 
A" 

45 PRINT "(-))-->DIREITA 

if 

46 PRINT "(SETA P/ CIMA) 
—IVERTICAL 

P/ CIMA" 

47 PRINT "(SETA P/ BAIXO 


)-->VERTICAL 
P/ BAIXO" 

48 PRINT "<L>---)LER DES 
ENHO" 

49 PRINT "(G>--->GRAVAR 
DESENHO" 

50 PRINT "<F>—>SAIR FO 
RA DO PROGRAM 

A" 

55 VTAB 23: HTAB 15: INV 
ERSE : PRINT 
"DIVIRTA-SE!": NORMAL 
60 HCOLOR = C 

100 H = PEEX (39) 

101 PRINT "HPLOT "A"/'B 
105 IF H = 48 GOTO 100 
125 IF H = 8 THEN MA : 
GOTO 2500 

130 IF H = 9 THEN MP : 
GOTO 100 

135 IF H = 7 THEN MA : 
GOTO 4000 

140 IF H = 44 THEN MA : 
GOTO 100 

145 IF H = 40 THEN MA : 


GOTO 5000 


150 

IF 

H = 3 GOTO 2000 

155 

MP 



160 

IF 

H = 24 THEN 

G03Ü 

6 5CD:A 

= A + 


l: GOTO 

1000 


170 

IF 

H = 18 THEN 

60SU 

B 520:A 

= A - 


i: GOTO 

1000 


180 

IF 

H = 36 THEN 

G03Ü 

B 540:B 

= B - 


l: GOTO 

1000 


190 

IF 

H = 30 THEN 

GOSÜ 

B 560:B 

= B + 


l: GOTO 

1000 


200 

IF 

H = 16 THEN 

GOSÜ 

B 580:A 

= A + 


1:B 

= B 

- l: GOTO 1000 

210 

IF 

H = 17 THEN 

GOSÜ 

B 600:A 

= A - 


i:B 

= B 

- l: GOTO 1000 

220 

IF 

H = 11 THEN 

GOSU 

B 620:A 

= A - 


l:B 

= B 

+ l: GOTO 1000 

230 

IF 

H = 10 THEN 

GOSU 


í> 
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B 640:A = A + 

l:B 

= B + i; GOTO 1000 

250 

GOTO 100 

500 

IF A = 277 GOTO 1200 

5ÍC 

RETUSN 

520 

IF A = 1 GOTO 1200 

530 

RETURN 

540 

IF B = i BOTO 1200 

550 

RETURN 

560 

IF B = 182 GOTO 1200 

570 

RETURN 

580 

IF A = 277 OR B = 1 

GOTO 

1200 

590 

RETURN 

600 

IF A = 1 OR B = 1 GO 

TO 1200 

6ÍC 

RETURN 

620 

IF A = 1 CR B = 182 

GOTO 

1200 

630 

RETURN 

640 

IF A = 277 CR B = 18 

2 GOTO 1200 

65C 

RETURN 

1000 

ÍF F = 0 GOTO 1500 

1010 

HPLOT A,B 


1020 

GOTO 100 


1200 

FOR I = 1 TO 3 


1210 

PRINT CHR4 (7) 


1220 

NEXT 


1230 

GOTO 100 


1500 

IF F = 3 THEN S 

= 0 

1510 

IF F = 0 THEN S 

= 3 

1520 

HCOLOR = S 


1530 

HPLOT A,8 


1540 

HCOLOR = 3 


1550 

HPLOT A,B 


1560 

GOTO ICO 


2000 

PRINT CHRl (7) 


2010 

IF C = 3 THEN C 

= 0 

: HCOLOR = C 


: HFLCl A,8: GOTO 100 


2020 1 

= 3 


2030 

HCOLOR = C 


2040 

HPLOT A,B 


2050 

GOTO 100 


2500 

OTAB 24: PRINT '■ 

'CON 

FIRMA 

FINAL ( 


S/N)?-"; 


2510 

GET H5 


2520 

IF HS ( > THEN 

130 




2530 TEXT 
2540 CALL 64351 
2550 END 

3000 PCKE 6í,l60i POKE 6 

C.OG: POKE 63 

,i9íi POKE 62,255: REiORN 

4000 VTA3 24: PRIiyT "CON 
FIRMA BRAOACA 
0 (S/i';;?";: GET HS 
40ÍÜ IF HS < > "S" THEN 
ÍOO 

4020 PRINT ; INPüT "NOME 
DÔ DESENHO ( 

6)— )";HS 

4030 IF LEN (Hí) > 6 TH 
EN 4Ü2G 

4040 FmR I = LEN (HS) + 
í TC 6:HÍ = 

HS t " NEX; 

4050 GOSÜB 6000: GOSÜB 3 
000 

4060 PRIívT : PRINT "AOüA 
ROE ONS INSTA 
NTES,.."; 

4070 CALl. 60570 
4080 ,3Ü'0 iCC 


5000 

OTAB 24: 

i PRINT "CON 

FIRMA 

LEITURA 



(S/N)?";: GET 

HS 


5010 

IF HS < 

> "S 

" THEN 

iOO 




5020 

PRINT : 

INPÜT 

"NOME 

DO ARSÜIOO ( 



6 L£TRAS)->";H$ 


5030 

IF LEN 

(HS) 

( > 6 

THEN 

5020 



5Ü4G 

FCR I = 

LEN 

(HS) + 

1 TO 

6:H4 = 



HS + 

" NEXT 


5050 

GCSÜS 6000; GOSÜB 3 

OCO 




5060 

PRÍnT : 

PRINT 

" AGÜ 

ARDE. 

« • j 



5070 

CALl 60846 


5080 

GOTO 100 


6300 

FOR I = 

1120 ■ 

TO 112 

•J 

6Ü1G 

POKE I, 

ASC ( 

HIDS 

(HS,i 

- 1119, 



D) + 

128 



6020 

NEXT 



6030 

RETURN 






O 



Invasores 1 - TK-85 


Paulo Panagiotis Alvanos 

M ais um divertido jogo entra para 
sua coleção. “Invasores” é uma 
micro réplica do famoso jogo 
Space Invaders, que tem por finalidade de¬ 


fender sua base dos alienígenas que pou¬ 
sam, lentamente, sobre a superfície de 
seu planeta. Para evitar que isso aconteça 
é necessário atacá-los com seus tiros até 
que eles recuem. 

Sua digitação é simples não oferecen¬ 


do maiores problemas. 

Para movimentação de sua base utilize 
as teclas “5” para esquerda, “8” para a di¬ 
reita e “V” para atirar. Ao final do jogo é 
apresentado sua pontuação e se deseja 
continuar ou não. Bom jogo... 


10 CLS 

15 L£T P=S 

20 LET D-P-P 

30 LET N=-D 

4-0 LET Y=N-N 

50 LET N=N4í 

60 LET X=INT (RND±75 

70 LET C=N-N 

30 LET Y=Y+1 

90 IF X=1 ÜR X=9 ÜR RND>.7 THE 
N LET D=-D 
100 LET X=X-l-D 

110 IF Y>15 THEN PRINT "^*5RSE 
INURDIDR... PONTOS =“:N 
115 IF Y>15 THEN GOTO 210 
120 SCRÜLL 

130 LET P=P-í:INKEY $ = '‘5'‘ RND P) + 
(INKEY$ = “3' RND P <10’i 


140 PRINT PT 15,P;" PND 

INKEY$ = "U" ; ■ 

150 PRINT PT 16, P.;" A ";PT Y,X 

■' 160 IF P55K i;p5EK 16396+PEEK 16 
399*256)=1 THEN GOTO 40 
170 PRINT 
130 LET 0=0+1 
190 IF 0>=4 THEN GOTO 70 
200 GOTO 120 
210 CLS 

220 PRINT- PT 10, 3 ; ‘'CONTINUP (S/N 
) ” 

230 IF INK.EY5= 'S'’ THEN GOTO 10 
235 IF INKEY$ = ‘'N'' THEN GOTO 250 
240 GOTO 230 

250 STOP ^ 
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Pelicano 


Mergulhe nesta aventura com 
seu TK-90X. 


Elaine Kelly Lima 


C omo todos sabemos, o pelicano é 
uma ave aquática de pernas curtas 
que, para sobreviver, ocupa-se da 
pesca. Sendo um hábil pescador, ele es¬ 
pera 0 momento exato para mergulhar e 
apanhar, de improviso, seu alimento. 


Neste joguinho desenvolvido para o 
TK-90X com RAM de 16 ou 48 Kbytes, vo¬ 
cê terá a oportunidade de simular um peli¬ 
cano que, para sobreviver, ataca os habi¬ 
tantes do mundo submarino. 

A manipulação do pelicano pode ser 
feita com joystick ou através do próprio te¬ 
clado. No segundo caso, as teclas de con¬ 
trole são: 

5 - muda o vôo para a esquerda; 

6 - faz com que a ave abaixe o vôo; 

7 - a ave voa mais alto; 

8 - 0 sentido do vôo é para a direita; 

9 - provoca mergulho do pelicano. 

Para passar da primeira fase a ave, con¬ 
trolada por você, terá que comer 7 peixes, 
sendo que, para isso, não poderá ultrapas¬ 
sar o tempo especificado pelo programa. 


Caso não consiga, seu pelicano perderá o 
vigor e por conseqüência, morrerá. 

A cada nível o tempo especificado para 
completar a pescaria diminui e deste mo¬ 
do, somente a sua habilidade como pes¬ 
cador poderá mantê-lo vivo. 

Sub-rotinas do programa 

A linha 10 inicializa a tela e chama duas 
sub-rotinas: linha 1050 que forma caracte¬ 
res gráficos e linha 510, que exibe a tela 
inicial. A linha 20 inicializa as variáveis que 
auxiliam a formatação da tela de jogo. A li¬ 
nha 30 exibe fundo da tela do jogo. A roti¬ 
na das linhas 40 a 82 controla o jogo. Da 90 
a 120 fazem a formatação da tela do jogo. 
A rotina entre as linhas 200 e 240 exibe tela 
final. 


10 PhPER 0; INK 7; BORDER 0: B 
RIGHT i: CLS : l_ET h i =0 : GOSUB 1 
050: GOSUB 510 

20 LET t=300; LET p=l; LET SC= 
0: LET 1=0: LET d =0 : LET a$ = ‘'«^/ 
LET b$=3S: LET = 

: LET d$ = ‘'ií LET £$ = " 

. 1 ^ ^ 

LET S=5: LET b=15: LET C=1 

30 BORDER 0: BRIGHT 1: PRINT fi 
T 0,0; INK 0; PhPER 6 ;“ PLfiCRR 
RECORD "; RT 0,10, 

sc;RT 0.25;hi;PT 21,0;" LRGO 1 
TEMPO 300 ": FOR f 

= 1 TO 15: •PRINT RT F,0.; PAPER 5; 

” : NEXT f : PRINT PfiPER 1; , , , , , .. 

'' 40 LET êí=£$ (32) +e4 ( 1 TO 31)+£ 
$(34 TO 64) +£• $ (33) : PRINT RT 16, 
0, PAPER 1; INK 6; BRIGHT l;e$: 
IF d=l THEN GOTO 90 

45 PRINT RT 3:b; PAPER 5; BRIG 
HT l;" ; RT a+i ■ fa; ■■ “ : IF INKE 

Y$="3" THEN LET b$=b$(5 TO ) +b$ ( 
1 TC 4): LET 3$=b$: LET C=l: LET 
d$ = '% LET b = b + l-(30 AND b = 

30) : GOTO 70 

50 IF INKEY$ = ‘'5" THEN LET C$ = C 
$(5 TO )+C$(l TO 4): LET a$=C$: 
LET b=b-l+(30 AND b=0): LET C=-l 
: LET d$ = " íf : GOTO 70 

60 LET 3 =3 -i-( INKEY$=‘'6" AND a-iS 
) - (INKEY$ = ''7" AND 3>1): IF INKEY 
$="9" THEN LET d=l 

70 LET a$=3$(5 TO )+3$(l TO 4) 

: PRINT AT a,b; INK 01 PAPER 5;a 
$ ( 1 TO 2 .1 ; AT a 1 , b ; a $ ( 3 TO 4 ) 

30 PRINT AT 18'. 0; PAPER Ij" 

" ; AT 

0,10; PAPER 6; INK 0.;£. C: IF £C> 


0 

AND SC/7=INT 

(sc/7) AND L=0 

TH 

EN 

LET £$ = ^'+$: 









LET p=p+l: LET 

t =3 

00 

- ( ( (P -1) -+20) 

AND P-;10)-{160 

RN 


D p;>9): PRINT AT 21.9; PAPER 6; 
INK 0.;p.;AT 21.21;t:'LÉT 1=1 

81 LET t=t-l: PRINT AT 21.21; 

PAPER 6: INK O ; t ; " : lE t >0 THE 

N GOTO 40 

82 GOTO 200 

90 50UND .001.60-3; LET pl=5: 
LET p2=5: PRINT AT a.b; PAPER Pl 
, BRIGHT 1; ■' ” : AT 3+1. b; PAPER 

P2; ■' LET a =3 + 1: LET b = b + C+(2 

6 AND b;=2)-(26 AND b>=29): PRIN 
T AT 3,b; INK 0; PAPER Pl; BRIGH 
T l;d$(l TO 2): AT a+l,b; PAPER P 
2;d$í3 TO 4) : IF 3=16 THEN LET p 
1=5: LET p2=i: IF £ $ ( b TO b + D-O 
'■ THEN LET £$(b-l TO b+2) =" 
PRINT AT a.b; PAPER 1; BRIG 
HT 1;" ".;AT a+l.b;" " ; LET d =0 ; 

LtT a=8; LbT 3C=£C+1: GOTO 81 
95 IF 3=15 THEN SOUND .01,10: 
SOUND .01,12 

100 IF 3=17 THEN LET pl=l: LET 
P2=l: IF £$ (b+32) •; >■■ •' THEN LET 

e$(b+31 TO b+33)=“ ": PRINT AT 

3,b-l; PAP5R 1; BRIGHT 1;'' 

;AT a+l,b;" ": LET d=0: LET a=8 

: LET SC=SC+1: LET 1=0; GOTO 81 
110 IF 3 >17 THEN PRINT AT a.b-1 
; PAPER 1; BRIGHT 1 ; " ";AT 3+ 

LET 3=8: LET d =0 

120 GOTO 81 

200 i-OR g=0 TO 10: FOR f =0 TO 7 
: SOUND .001,1-+40: OUT ‘254 , f+8 : 
OüT 254,200: PRINT AT 3.b; ' INK f 
; PAPER 5; OUER 1;” ";ÁT 3+1,b; 

": NEXT í■ NEXt q: CLS 
210 PAPER 0: INK 7: BORDER 0: 0 


t> 
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mmf/ 


J15 PRIWT fíT 14.,0;“ 

II lli liijiil 

220 IF =• C > h j THEN oOÜND .5,10: 
SOUND .5.0; 5ÒUND .2.12: SOUND . 
2,12; SOUND 1.20: PRÍNT PT 15,0.1 
INK 0; PRPER 6; BRIGHT 1; FLPSH 
1.; " UM NOUO RECORD 

" : LET h 1 =;. C 

230 PRINT PT 13.0; INK 7; BRIGH 
T 1;'* PRECIONE TÉCLP.P/ CÒNTINUP 
R 


24-0 PPUÕE 1: PPUSE 0: GOTO 20 
510 PRINT PT 5,4 .,‘'Ucice e um pel 
i c a n 0 p e s c 3 d 0 r e adora comer p ei 
X es. Por e m y o c e t e r a u m d e t e r min a 
do tempo p a r 3iss 0 . No p rimeir o 
lago voce ter.aque comer todos o 
s p e i ;>í e s p a r a p o d e r ir ao p r o x i 
mo. Porem a cadanovo laao voce te 
ra menos tempo.” 

520 PRINT PT-16.4; INK 6;“USE P 
5 SEGUINTES TECLPS': 5-ESO 

UERDP S-DIREITP 6-DESCE 

7-SOBE 9-PESCP" 

530 PRINT PT 20.0; INK 0; PPPER 
6.; FLPSH l;” PRECIONE tECLP P 
PRP COMECPR 

540 LET a$ = ''*^r ^ ■•: LET b$ = ” 

'■ 

550 PRINT PT 1.5; INK 6;a$(l TO 
2.1; PT 1,25; b$íl TO 2); PT 2,5; a $ 
('3 TO 41; PT 2,25; bê (3 TO 41: OUT 
254,24: IF INKE-y-$ = "" THEN LET a 
$=a$l5 TO l+aiíl TO 41: LET b$=b 
$(5 TO 1+b$!:i TO 41: OUT 254,200 
: GOTO 550 
560 RETURN 
600 STOP 


1000 DPTP 0,0,1.3.167,255,235,65 
, 43,54,44.52,40 66.112,224,224,1 
76,69,41,161.215.235,127,O,192,2 
24,56,191,246 , 224,192 
1010 DPTP 0.0.126.192.221,255,21 
5,170,212,106.52,44,20,24,14,7,7 
,13,154,146,173,235,215,254,0,3, 
7,28,253,31.7.3 

1020 DPTP 0.32.65,115.127.115,65 
,128,0,96.248,204,232.252.246,96 
, 0,6,3Í , 5Í , 23.63 , -31.6.0.4.130,20 

6.254.206.130.1 

1030 DPTP 152,146.213.213,250,12 
5,122,61,0.0,0.0.Í23.126.123,192 
, 30,7 ,.0,0,0,0,0.0.240,216,232,24 

8.124.12.2.1 

1040 DPTP 0.0.0.0.1,1.1,3.25,41, 
91,171,95,190,94.Í38.15.27,23,31 
,62,48,64.128 . 120.224.O.O.O.O,0, 
0 

1050 FOR f=USR ”a" TO USR "f+T: 

REPD a; POKE ? , a: NEXT f;.RETUR 
N 


P B C D E F G HIJ K L M N OPOR 'ST U 
P =i«l 




uoce e um pelicano pescador 
e adora comer peixes. Porem voce 
tera um determinado tempo para 
i s s 0 . No primeir o ia g o voce t e r a 
que comer todos os peixes para 
poder ir ao proxi mo . Po rem a cada 
n 0 V 0 I a g o voce t e r a m e n o s tempo. 


USE PS SEGUINTES TECLPS: 
5-ESQUERDP 8-DIREITP 

6-DESCE 7-SOBE 9-PESCP 

PRECIONE TECLP PPRP COMECPR 

TELA INICIAL <> 


Tente Estas! 

_ TK-90X _ 

POKE 23609,N 

onde N é a tonalidade do som do teclado 


_ TK-90X _ 

POKE 23613,0 

protege programa contra listagem 


_ TK-90X 

POKE 23562,N 

onde N é a pausa na repetição 


_ TK-90X 

POKE 23658,8 
letras maiúsculas 


_ TK-90X 

POKE 23692,255 

roda 0 programa sem SCROLL 


_ TK-90X 

POKE 23756,0 

numera primeira linha igual a 0 
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Utilizando os 64K 
de RAM do seu 
TK-2000 

Aroldo Possuelo de Carvalho 

A ntes de falar e praticarmos o uso da 
expansão do TK-2000, vamos dar 
uma olhada em seu mapa de me¬ 
mória. Vejam a Figura 1. 


$C100 

$FFFF 

RAM 
48 K 

FIGURA 1 

49664 $C100 

ROM 

16K 

65535 


$FFFF 


À esquerda, temos o mapa de memória 
do TK-2000, com 48K de memória RAM 
(Rándom Access Memory) e 16K de me¬ 
mória ROM (Read Only Memory). 

Na RAM temos variáveis do BASIC, 
duas páginas de vídeo e memória para o 
usuário programar em BASIC ou em Lin¬ 
guagem de Máquina; na ROM temos o 
programa monitor e todas as rotinas de 
cálculos de Ponto-Flutuante, bem como 
as rotinas BASIC. 

Mas, alguma vez, você jádeve ter se per¬ 
guntado; 

1) como meu TK tem 64K de RAM, sendo 
que só estão disponíveis 48K? 

2) como pode o 6502 endereçar mais que 
64K de memória, sendo que o seu “bus 
de endereço” é de 16 bits, e isto só per¬ 
mite endereçar 64K de memória? 

3) onde estão os outros 16K de RAM? 

4) se existem, como usá-las? 

Se você fez algumas destas perguntas, 
aqui estão as respostas: 

Ao ler o "Manual Técnico do TK-2000”, 
você deve ter visto que nos endereços de 
SCOOO a SCOFF temos 256 bytes para 1/0, 
ou seja, para controlarmos os periféricos 
de entrada/saída, como: 

- Teclado (SCOOO) 

- Página de Vídeo 1 e 2 (SC054, $C055) 

-1/0 para gravador K7 ($C020), (SCOIO) 

- Vídeo colorido e P/B ($C051), (SC050) 

- Seleção de RAM ($C05B) 

- Seleção de ROM (SC05A) 

Estes dois últimos 1/0’s mencionados 
são os responsáveis pela seleção dos 16 
Kbytes de RAM que completam os 64 K de 
RAM. 

Bem, até aqui talvez alguns dos leitores 
não tenham nenhuma dúvida, mas agora 


vamos ver como é que tudo isto funciona. 

Você pode ter notado que os 16K de 
RAM estão ocupando os mesmos endere¬ 
ços que os 16K da ROM. 

Portanto, se ativarmos a RAM (expan¬ 
são) diretamente, perderemos o controle 
do TK, pois a ROM é acessada constante¬ 
mente. 

Como exemplo, deve-se fazer o seguin¬ 
te: 

- ligue o TK-2CXX). Se você estiver usando 
disk-drive dê um RESET no teclado; 

- digite (LM) para entrar no modo monitor; 
-digite$C05B RETURN. 

Daí para frente nada mais acontecerá, 
ou então coisas estranhas aparecerão na 
tela, pois o TK-2000 passou o comando 
para a RAM e lá não havia nenhuma rotina 
que pudesse continuar monitorando o te¬ 
clado e 0 vídeo pelo menos. 

Há necessidade de se usar uma peque¬ 
na rotina em Linguagem de Máquina, que 
controle a ROM e a RAM sem problemas. 

Em nosso programa BASIC temos 
duas linhas DATA que contêm a rotina(em 
Linguagem de Máquina), que controlam a 
expansão e lhe mostrará como fazer para 
usar a expansão em seus programas. 

Gostaria de destacar que você poderá 
usar esta expansão de memória para sal¬ 
var espaços da memória RAM normal, ou 
até mesmo colocar nela rotinas de Lingua¬ 
gem de Máquina que torne o seu TK-2000 
mais versátil. 

Abrindo um pequeno parêntese, é as¬ 
sim que o Apple II trabalha. Um programa 
que está na RAM de 48K carrega outras 
linguagens na expansão (mais conhecida 
como “Language Card”) como por exem¬ 
plo, FORTH, Integer BASIC,COBOL, eou¬ 
tras rotinas.Isto é muito interessante,pois 
você poderá fazer o mesmo no TK-2000. 

Bem, para isto é preciso aprender co¬ 
mo fazer. 

Mostrarei como salvar e recuperar da¬ 
dos na expansão, e isto será o bastante 
para que você possa criar novas rotinas e 
novas aplicações para o TK-2000. 

Muitas pessoas não acreditam no TK- 
2000, pois pensam que o mesmo é compa¬ 
tível com o Apple II quando, na verdade, 
somente o BASIC Applesoft é compatível, 
e não em 100 por cento. 

O TK-2000 possui características bem 
diferentes e é um computador com muito 
potencial a ser explorado, sendo que só 
uma minoria tem feito isto. 

Bem, voltando ao nosso problema, va¬ 
mos analisar o nosso programa. Ele está 
escrito em BASIC, mas o mesmo carrega 
as linhas DATA.a partir da posição $300 
(768), que é a nossa rotina que controla 
RAM/ROM e permite salvar dados RAM — 
Expansão e ler os dados da Expansão — 
RAM. 



Para isto, separei uma área de memória 
que será o nosso bufferóe dados. Esta 
posição é de $4000 a $7DFF (16384 a 
32511); isto equivale a 16127 bytes de me¬ 
mória. 

Ao ser rodado (RUN), o programa BA¬ 
SIC lerá os dados contidos nas linhas DA¬ 
TA e fará POKE’s na posição $300 (768). 
Depois, apresentará um breve texto de 
instruções para uso do mesmo. 

Vamos agora analisar a rotina em Lin¬ 
guagem de Máquina. 

Se você nunca trabalhou em Lingua¬ 
gem de Máquina não se preocupe, pois a 
rotina é muito simples, e está bem deta¬ 
lhada. 

Temos abaixo a listagem do programa 
em Assembler que inicia no endereço 
$300 (768) e termina em $353 (851); este 
bloco inclui duas rotinas. A primei rase en¬ 
carrega de transferir os dados da memória 
RAM normal (MEMO) para a memória 
RAM expansão (EXP). E a segunda faz a 
transformação em sentido oposto, ou se¬ 
ja, EXP - MEMO. 

Nas linhas de $300 a $30E, a rotina pre¬ 
para quatro posições da página zero que 
são as seguintes: 

$00 e $01; posições LOW e Hl, que car¬ 
regarão os dados de MEMO. 

$02 e $03: posições LOW e Hl, que ar¬ 
mazenarão os dados na EXP. 

Na linha $310, o Index RegisterY é ze- 
rado, onde Y será o contador de 0 a 255. 

A linha $312 carrega o acumulador 
apontado por $00 e $01, mais Y. 

A linha $314 habilita os 16K de RAM 
EXPANSÃO. 

Na linha $317, o valor contido no acu¬ 
mulador será armazenado no endereço de 
memória apontado por $02 e $03, mais Y. 

A linha $319 habilita a memória ROM. 

A linha $31C incrementa Y (Y -i-1). 

A linha $31D salta para a linha $312 se Y 
for diferente de zero, isto ocorrerá 255 ve¬ 
zes. 

Na linha $31F, se Y for igual a zero, en¬ 
tão a posição $01 é incrementada. 

Na linha $321, a posição de memória 
$03 é incrementada. 

A linha $323 carrega o acumulador com 
o conteúdo da posição $01. 

A linha $325 compara o acumulador 
com # $61. 

A linha $327 retorna à linha $312 se, na 
comparação, os valores forem diferentes. 

A linha $329 retorna ao BASIC, se na 
comparação, os valores forem iguais. 

Da linha $32A à linha $353, a rotina é si¬ 
milar à anterior. 

O programa BASIC também se encarre¬ 
ga de comparar valores nas faixas de 
$2000 a $9600 e considerando 16K de 
comprimento: ele contém também as 
principais instruções. ^ 
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Em seus programas, você só precisará 
usar a rotina em Linguagem de Máquina 

Quero lembrar que um número precedi¬ 
do de “S” (dólar) significa um número em 
hexadecimal. 

Após ter digitado corretamente o pro¬ 
grama BASIC, digite LM seguido de um 
RETURN. 

$4000: 00 00 00 00 00 00 00 00 00 00 
00000000000000000000 

Você zera 20 bytes, de $4000 a $4016. 

Digite CONTROL - C para voltar ao BA¬ 
SIC e RUN, selecione a opção 2 do MENU, 
retorne ao monitor com RESET e LM. Digi¬ 
te $4000 L RETURN, você verá que os valo¬ 
res foram alterados, pois a expansão con¬ 
tinha estes valores. 

Agora, rode o programa novamente 
RUN (RETURN) e selecione a opção 3. Mu¬ 
de os endereços de transferência para: 

INÍCIO; 8192 

FINAL: 16383, que correspondem à pri¬ 
meira página de vídeo. 

Aparecerão barras ou pontos, enfim, vo¬ 
cê visualizará os dados continuados nos 
primeiros 8K da expansão e, logo após ter¬ 
minada a transferência, o programa BA¬ 
SIC voltará às Instruções Iniciais. 

Daí em diante, você pode transferir roti¬ 
nas, telas de vídeo ou tabelas de dados, da 
memória para a expansão e vice-versa. 

O programa roda bem com disk-drive, e 
funcionou num TK-2000, com 64K de 
RAM. 


LISTAGEM 


0300- 

A9 00 

LDA 

RiOO 

0302- 

85 00 

STA 

iOü 

0304- 

A9 00 

LDA 

«iOO 

0306- 

85 02 

STA 

i02 

0308- 

A9 20 

LDA 

Ri20 

030A- 

85 01 

STA 

iOí 

030C- 

A9 C2 

LDA 

tíiC2 

030E- 

85 03 

STA 

i03 

0310- 

AO 00 

LDY 

RiOO 

0312- 

BI 00 

LDA 

(Í00),Y 

0314- 

AE 5B CO 

LOX 

ÍC05B 

0317- 

91 02 

STA 

(Í02),Y 

0319- 

AE 5A CO 

LDX 

ÍC05A 

031C- 

C8 

INY 


031D- 

00 F3 

BNE 

Í0312 

031F- 

E6 01 

INC 

iúl 

0321- 

E6 03 

INC 

i03 

0323- 

A5 01 

LDA 

iOl 

0325- 

C9 40 

CHP 

Ni40 

0327- 

DO E9 

BNE 

Í0312 
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0329- 

60 


RTS 


Ü32A- 

A9 

00 

LDA 

RiUil 

G32C- 

85 

00 

STA 

iOCi 

C32E- 

A9 

00 

LDA 

ííiOO 

0330- 

85 

02 

STA 

502 

0332- 

A9 

20 

LDA 

Ri2D 

0334- 

85 

01 

STA 

iOl 

0336- 

A9 

C2 

LDA 

#ÍC2 

0338- 

85 

03 

STA 

i03 

033A- 

AO 

00 

LDY 

«ÍOO 

033C- 

AE 

5B CQ 

LDX 

ÍC053 

033F- 

BI 

02 

LDA 

(102),Y 

0341- 

AE 

5A CO 

LOX 

ÍC05A 

0344- 

91 

00 

STA 

(Í00),Y 

0346- 

C8 


INY 


0347- 

00 

F3 

8NE 

ÍÜ33C 

0349- 

E6 

01 

INC 

101 

D34B- 

E6 

03 

INC 

i03 

034D- 

A5 

03 

LOA 

i03 

034F- 

C9 

E3 

CHP 

NiE3 

0351- 

DO 

E9 

BNE 

Í033C 

0353- 

60 


RTS 



0 REH »««««»««*««««)(«««« 

1 REM * USAítOO A EXPAM9 
AO DE m * 

2 REH » AROLDO POSSUELO 
DE CARVALHO* 

3 REH « 

4 REH » HAIO 19 

8ó « 

5 REH v*»*****»»*»*»***» 
*«»»•)(«««»»« 

7 HOHE 
10 DIH A(83) 

15 FOR I = 768 TO 851:N 
= (I - 768): READ A(N): PO 
KE I,A(H): «EXT I 
20 INVERSE ; PRINT " TR 
ANSFERENCIA 0 
A HEHORIA / EXPANSAO 
NORHAL 

25 PRINT : PRINT " ES 
TE PROGRAHA T 
RANFERE 0 CONTUDO OA HEHÔ 
RIA RAH 

PARA A EXPANSAO DE 16K DO 
TK200 


0 , E VICE-VERSA." 

30 PRINT : PRINT " OS 
DADOS A SERE 

r, TRANFERIDOS SEHaO OS D 
E Í4000 

- Í7DFF -> tC200’- ÍFFFF. 
OU VI 

CE-VER3A , ISTO LHE PERHI 
TIRA’ 

ULTILIZAR HELHOR A HEHO 
RIA DO T 
K2000. 

35 PRINT : PRINT " AO 
UI ESTA’ A E8 
UIVALENCIA DOS ENO. DE H 
EXADECIH 

AL PARA DECIHAL REPECTIVA 
S.": PRINT : PRINT "S4000 
-> 16384": PRINT "I7DF 
F -> 32511": PRINT "IC200 
-> 4966 

4": PRINT "5FFFF -> 65535 
// 

40 PRINT : PRINT : PRINT 
" P 

RESSIONE UHA TECLA 

": SOUND 50,20: GET AC 
HOHE 

45 HTAB l: VTAB 5: PRINT 
"1 - HEHORIA 
PARA EXPANSAO": HTAB i: 
VTAB 7: PRINT "2 - EXPANSA 
0 PARA HEHORIA": HTAB 
l: VTAB 9: PRINT "3 - HUD 
AR END. 

DOS DADOS TRANSFERIDOS " 

50 VTAB 13: INPUT "ÔUAL 
E’ A SUA ESCO 
LHA ?:";AI 

55 IF Ai = "1" THEN 100 

60 IF Ai = "2" THEN 150 

63 IF Ai = "3" THEN 200 

65 GOTO 50 

7ü DATA 169,0,133, 0,1 
69,0,133, 2,1 
69,64,133, 1,169,194,133, 
3,160,0 

,177, 0,174,91,192,145, 2 
,174,90, 

192,200,208,243,230,1,230 












MICROHOBBY 


1,201,97,208,233,96,169,0 
,133,0,1 


205' HOME : PRINT : PRINT 

69,0 


210 PRINT " DIGITE 0 

80 DATA 133, 2,169,64,1 


NOVO ENDEREÇO 

33, 1,169,194 


00 BLOCO DE DADOS A SER 

,133, 3,160,0,174,91,192, 


EM TRANS 

177, 2,1 


FERIDOS." 

74,90,192,145, 0,200,208, 


220 HTAB l: VTAB 7: PRIN 

243,230, 


T "USE ENDERE 

1,230, 3,165,3,201,210,20 


COS DE 8192 (12000) A 384 

8,233,96 


00 (59 

600)": PRINT : PRINT 

100 REh MEHÔ -> EXP. 


225 INPUT "DIGITE NUM. D 

105 HOME : VTA8 11: HTAB 


ECIMAL DE INI 

l: PRINT "TR 


cio: ";N5 

ANSfERINDO DADOS PARA EXP 


227 GOSUB 500: POKE 769, 

ANSAO... 


L; POKE 777,H 

H 


: POKE 811,L; POKE 819,H 

120 CALL 768; GOSÜB 300: 


280 PRINT : INPUT "DIGIT 

GOSUB 165 


E NUM. DECIMA 

130 GOSUB 300: HOME : GO 


L FINAL: "jNS 

TO 20 


282 GOSUB 500; POKE 80ó, 

150 REH EXP -> MEMO 


H + 1 

155 HOME : UTAB 11: HTAB 


290 A = PEEK (806) - PE 

l: PRINT "TR 


EK (777) 

ANSFERINDO DADOS DA EXPAN 


291 IF A * 256 + 255 > 

SAO... 


= 15871 THEN 

n 


380 

160 CALL 810: G03U8 300: 


295 POKE 848, PEEK (823) 

GOSUB 165: HOME : GOTO 20 


+ A + 1 

299 PRINT : INVERSE : PS 

165 SOUNO 50,20: OTAB 11 


ÍNT "ENDEREÇO 

: HTAB l: PRINT "TRANSFERE 


S MUDADOS...": NORMAL : S 

NCIA TERMINADA ! 


OUND 50, 

10: GOSÜB 300: HOME t GOT 

HETURN 

200 REM MUDANDO Ó END. 


0 20 


300 

FOR I = 0 TO 600; NE 

XT ; 

RETURN 

350 

HTAB l; UTAB 23: INV 

ERSE 

: PRINT 

"NUMERO FORA DA FAIXA DE 

8192 

A 3 

8400 

": SOUND 40,10: NO 

RMAL 

: GOSUB 300: GOSUB 37 

o: GOTO 220 

360 

HTAB l; VTAB 23: INV 

ERSE 

; PRINT 

"ERRO. DIGI-TE.OS 5 ALGARI 

SMOS 



": SOUND 40,10; NO 

RMAL 

: GOSUB 300: GOSUB 37 

0: GOTO 220 

370 

HTAB l: V.TA8 23: PRI 

NT " 



": RETURN 

380 

HTAB l: VTAB 23: INV 

ERSE 

: PRINT 

"COMPRIMENTO DOS ENDEREÇO 

S MAIOR 

aUE 16K"; NORMAL : GOSUB 

300 : 

GOSUB 370: GOTO 220 

500 

REM CONV. DEC-)HEX 

505 

IF LEN (NI) < = 0 

THEN 

360 

520 

IF VAL (N5) > = 38 

401 OR VAL ( 

NI) ( 

: = 3191 THEN 350 

530 F 

1 = INT ( VAL (Ni) / 

256! 

:l = VAL (NS) - H * 

256 


555 

RETURN 


O 
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Conversão 

numérica 


Agora é fácil fazer conversão 
entre sistemas de numeração 
com o uso do TK 2000. 


Autora ZHah M. Miazaki 
Adaptação: Elaine Kelly Uma 


A o ver digitar, ou mesmo fazer um 
programa em Assembler, você de¬ 
ve ter notado que os números ali re¬ 
presentados normalmente são compos¬ 
tos por caracteres que variam entre 0 e F. 
Porém, para que utilizarmos caracteres al¬ 
fabéticos em um número, se o que apren¬ 
demos desde a infância é representá-los 
com dígitos variantes entre 0 e 9? 

Simplesmente, podemos dizer que isso 
ocorre devido a existência de vários siste¬ 
mas de numeração que se adaptam cada 
um a uma utilização específica. 

Nós sempre usamos o sistema de nu¬ 
meração de base dez, isto porque inicial¬ 
mente a representação das quantias e das 
contagens eram feitas usando os dedos. 
Como todos os seres humanos temos dez 
dedos, e por isso convencionou-se um sis¬ 
tema com dez caracteres. 

Quando foram projetadas as primeiras 
máquinas calculadoras tentaram fazer 
com que seu processamento fosse com 
números de base dez. Porém, com a evolu¬ 
ção eletrónica, verificou-se ser mais sim- 


iO HGR2 : HCOLOR = 3: F 
OR N = Ü TO í 

20 IF N iO THEN LET N 
= Í80 

30 HPLOT 0,N TO 279,N 
40 NEXT N 

50 POKE 34,5: ?0KE 35,19 

55 POKE 32,5: POKE 33,35 

60 CALL - 936 
70 HTA8 14: VTAB 8: PRIN 
T ^'COMVERTEND 
r; SPC( 51)j''NUMER0S"- S 
PC( 54)í 

"PARA"j SPC( 56)-"BASES"j 


pies e rápido representar, internamente no 
equipamento, apenas dois estados: ligado 
ou desligado. Os números para represen¬ 
tação destes estados são respectivamen¬ 
te 0 e 1, sendo que o sistema é binário. 

Devido à quantidade de memória ocu¬ 
pada pelos números binários e pela com¬ 
plexidade para se programar corretamen¬ 
te com apenas dois caracteres, conven¬ 
cionou-se para as linguagens de baixo- 
nível a utilização do sistema hexadecimal, 
ou seja, sistema com base 16 cujo carac¬ 
tere menos significativo é o 0 e o mais sig¬ 
nificativo é 0 F. 

A conversão entre sistemas numéricos 
é uma tarefa fácil, mas muitas vezes se 
torna cansativa. Como todos sabemos, 
existem vários sistemas numéricos e en¬ 
tre os mais conhecidos estão: 

- binários, cuja base é 2 e aceita os carac¬ 
teres 0 e 1: 

- octal, cuja base é 8 e seus números são 
formados com caracteres entre 0 e 7; 

- decimal, que é o utilizado normalmente 
por nós; 

- hexadecimal, com base 16 e faz a repre¬ 
sentação numérica com caracteres entre 
OeF. 

O programa apresentado aqui é para o 
TK 2CXX), e foi desenvolvido para usuários 
que sentem a necessidade de se aprofun¬ 
dar no BASIC do TK ou que estão inician¬ 
do 0 aprendizado em Linguagem de Má¬ 
quina. Porém, também é muito útil para 
programadores de Assembler fazerem 
suas conversões. 

Sua estrutura é simples, flexível e cor¬ 
rente para que você possa, dessa manei ra, 
entender sua lógica. 

Ao rodá-lo, a tela inicial fará uma apre¬ 
sentação e a seguir perguntará a base do 


SPC( 52 
)j"DIF£RENTES" 

8Ü INVERSE : HTAB 6: VTA 
8 18: PRINT " 

FRECIONE S PARA CÔNTINU 
AR": NORilAL : GET 35: IF B 
i < > "S" THEN POKE 
32,0: POKE 33,40: POKE 34 
,0: POKE 
35,24: END 

85 CLEAR : CALL - 936 

86 T5 = "0123456789ABCDEF 

H 

90 INOERSE : HTAB 6: OTA 

8 6: PRINT "D 

IGITE A BASE A CONVERTER" 

: HTAB 6 


número a ser convertida, e exibirá o res¬ 
pectivo resultado. A cada pergunta, o pro¬ 
grama faz uma verificação e observa se 
nenhuma informação absurda foi digita¬ 
da. A seguir, o resultado é rapidamente 
apresentado no vídeo e se o usuário qui¬ 
ser prosseguir deverá teclar “S”. 

Esquema lógico do programa 

Se você observaras linhas entre 10e40 
notará que elas são responsáveis pela 
apresentação de dois delimitadores: de 
início e final da tela. 

Na linha 50 o comando POKE 34,5 e PO¬ 
KE 35,19 abrem janela horizontal e na linha 
55 0 POKE 32,5 e o POKE 33,35 abrem ja¬ 
nela vertical. O CALL-936 apaga a tela. 

A linha a seguir é a 80 e ela Irá fazer a ve¬ 
rificação sobre a finalização ou não do 
programa. Na linha 86 você poderá obser¬ 
var a definição da variável que tem como 
conteúdo os caracteres que podem for¬ 
mar os números de todos os sistemas. 

A rotinaentreas linhas 90e200 executa 
a entrada e a consistência dos dados ne¬ 
cessários à conversão, e a rotina entre 210 
e 320 faz a conversão do número. 

A linha 330 faz a exibição do resultado e 
a 340 provoca retorno ao início. 

Conversão numérica no TK 3000 

Para converter este programa para o TK 
3000, ou qualquer compatível com os 
equipamentos da linha Apple, você deverá 
excluir as linhas entre 10 e 40 Inclusive. 

A retirada desta rotina ocorre pelo fato 
dos equipamentos compatíveis com o Ap¬ 
ple apresentarem a tela de texto separada 
da tela de alta-resolução. 


: VTAB 8: PRINT "DE 2 A.i 
6": NORHAL 

IGO HTAB 2G: VTAB 8: INP 
UT E: IF E < 

2 OR E > 16 THEN 100 
líO HTAB 6: VTAB 10: FRI 
NT "DIGITE NU 
MERO": HTAB 20: VTAB 10: 

ÍNPÜT N5 

120 L = LEN (N5) 

130 FOR F = 1 TO L:F5 = 

MID5 (N1,F,1 

) 

140 IF F5 < "0" OR F5 > 

MIDS {TS,E,1 

) OR L ( í OR L ) 30 THEN ^ 


50 
















MICROHOBBY 


F = 0:N 
= 0: GOTO ÍIG 
150 IF ASC (Ft) > 57 TH 
Eíl H = ASC ( 

Fí) - 55: GOTO 170 
160 H = VAL (Fí) 

170 N = N + M » E ML - 
F): IF N > 10 
* 9 THEN N = 0:F = 0: 30 
TO 110 
180 NEXT F 


190 HTA8 é: VTAB 12: LNv 
EfiSE : PRINT 

"DIGITE BASE A SER CONOER 
TIDO": HTAB 6: VTA3 14: PR 
INT "DE 2 A 16": NORHAL 
200 HTAB 20: VTAB 14: IN 
PUT E: IF E < 

2 OR E > 16 THEN 200 
210 FOR F = 0 TO 30: IF 
E MF + 1) ) 

N THEN 230 


220 NEXT F 

230 FOR C = F TO 0 STEP 
- 1 

240 FOR B = E - 1 TO G S 
TEP - 1 

250 H = E * C » B:.IF M < 

= N THEN Mi 

= Ml + MIDI (Ti,B + 1,1 

):N = N - M:B = 0: GOTO 30 

0 

260 NEXT B 


300 M = INT {N):L = M - 
N + i: IF L < 

.5 THEN N = M + 1 
310 IF L > = .5 THEN N 
= M 

320 NEXT C 

330 HTAB 6: VTAB 16: PRI 
NT "0 RESULTA 
DO HTAB 20: VTAB 16: 
PRINT Ml 

340 GOTO 80 ^ 




Tente Esta! 

Elaine Kelly Uma 



20 PLOT n.0: PLOT n,175 

30 NEXT n 

4-0 FOR n=0 TO 174 

50 PLOT 0,n: PLOT 175,n 

50 NEXT n 

70 LET a=0 

30 FOR n=167 TO 0 5TEP-3 
90 LET a=3+8 
100 PLOT 0.n DRRU a.-n 
110 DRRU n,ã 
120 DRRU -a.,n 
130 C>RRü -n ■ -a 
140 NEXT n 

o 


T ente este no seu TK-90X. Modifican¬ 
do 0 STEP da linha 80, você poderá 
diminuir ou aumentar as dimensões 
dos quadrados. 



1’ flueo 


GRAVE SEU PROGRAMA 
DE GRAVADOR PARA 
GRAVADOR SEM 
PROBLEMAS 


COM FILTRO 
FCA 


Elimine erros de passagem 
de programas p/seu micro 

TECNISERVICE 

EQUIPAMENTOS ELETRÔNICOS LTDA. 
DISTRIBUIÇÃO EXCLUSIVA 


w 


MfIGriOPfITfl 

Jinformática Itáo 

Av. Paulista, 2644 — 8? Cj. 86 

F: (011) 255.7653 J 
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VICE-VERSA 

Loy-out da tela 
de vídeo 

Elaine Kelly Uma 


A projeção de um lay-out de vídeo 
perfeito é fundamental em qual¬ 
quer espécie de programa, isto por¬ 
que normalmente é este terminal que per¬ 
mite a comunicação entre o programa e o 
usuário. 

O planejamento das telas de jogos é ca¬ 
racterizado pela exploração dos recursos 
gráficos do equipamento. Já os sistemas 
comerciais e os utilitários necessitam de 
telas que permitam ao operador visualizar 
todos os ciados e mensagens. 

A fim de apresentar aos usuários pro¬ 
gramas com boas telas, muitos profissio¬ 
nais optaram por trabalhar com o BASIC, 
pois todas as suas versões são muito fle¬ 
xíveis e oferecem diversos recursos. Entre 
seus comandos, o INPUT (entrada de da¬ 
dos via teclado) e o PRINT (exibição de da¬ 
dos) são os que majs afetam a formatação 
de tela de texto e por este motivo, tudo o 
que foi selecionado para este artigo está 
relacionado a um destes dois comandos. 

Dimensões diferentes 

Ao adaptarmos telas devemos conside¬ 
rar que a dimensão do vídeo dos equipa¬ 
mentos pode ser diferente, tornando ne¬ 
cessária a modificação do lay-out. Obser¬ 
ve as figuras 1 e 2, ambas apresentam 
uma tela de menu, porém a da primeira 
aceita até 40 colunas por linha, já a segun¬ 
da aceita apenas 32. 

Para adaptar lay-outs você precisará 
conhecer a dimensão das telas dos dife¬ 
rentes equipamentos e os comandos que 
trabalham com o posicionamento de in¬ 
formações. 


Versão do BASIC 

Dimensões 


Linhas 

Colunas 

Sinclair 

24 

32 

Spectrum 

24 

32 

Apple 

24 

40 

TRS-80 

16 

64 

Microsoft (corri cartão 80 colunas) 

24 

80 

Microsoft (sem cartão 80 colunas) 

24 

dimensão de 
colunas 
normais do 
equipamento 
usado. 


Alguns equipamentos utilizam as duas 
últimas linhas para mensagens do siste¬ 
ma. 


Os posicionadores 

Ao indicar a posição de exibição de 
mensagens ou variáveis, as instruções uti¬ 
lizadas pelas diversas versões são diferen¬ 
tes. A seguir, mostramos os posicionado- 
res mais comuns, onde e quando são usa¬ 
dos. 

Ohs.: Nos formatos que são apresenta¬ 
dos a seguir, Léo número de linha, Cé o 
número da coluna e Pé a posição. 


V.V. 013 


PRINT AT - E)icibe variável ou string na li¬ 
nha e coluna especificada pelo argumen¬ 
to da função AT. 

FORMATO - PRINT AT L, C; “variável ou 
constante’’ 

VERSÃO: Sinclair e Spectrum 

PRINT @ - Exibe variável ou string na 
posição indicada pelo argumento, que se¬ 
gue 0 símbolo de arroba. Este argumento 
pode variar de 0 a 1023. 


FIGURA 1 

CONTROLE OETERINARIO 
xxx- MENU PRINCIPAL 


í«INCLUSÃO 
2«ALTERACA0 
3«EXCLUSÃO 
4«CONTROLE 
5«F IM 


MENSA(3ENSs OPCAO DESEJADA 


FIGURA 2 

Menu Principal 


i: "fr ir ± "f: 


1 . In C lüSâO 

2 . P. L t e r â c a o 

3.Exc lUSâO 
4-.Reiatorio 
5. FIM 

Ob£ . . 
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FORMATO: PRINT @ P; “variável ou 
constante’’ 

VERSÃO; TRS-80 

TAB - Posiciona o cursor na coluna es¬ 
pecificada pelo argumento, sendo que es¬ 
te pode ser um número entre 0 e 255. 

FORMATO: PRINT TAB C; “variável ou 
constante”. Ou 

TAB C 

VERSÃO: todas 

HTAB - Posiciona o cursor na coluna es¬ 
pecificada pelo argumento. 

FORMATO: HTAB C 
VERSÃO: Apple 

VTAB - Posiciona o cursor na linha es¬ 
pecificada pelo argumento. 

FORMATO: VTAB L 
VERSÃO; Apple 

SPC - O argumento indica a quantidade 
de colunas em que o cursor se movimen¬ 
tará, adiante da posição atual. 

FORMATO: SPC P 
VERSÃO: Apple e Microsoft 
DEF FNT$(L,C) - Exibe variável ou cons¬ 
tante na posição indicada pelo FNT$(L,C). 
FORMATO: 

10 DEF FNT$(L,C) = CHR$(27) -f “Y” + 
CHR$(L + 31) + CHR$(C -h 31) 

20 PRINT Fm$(L,C); “variável ou 
constante” 

Obs.: A linha 10 deve ser colocada no 
programa uma única vez, pois apenas defi¬ 
ne a fórmula para formatação de tela, e ne¬ 
la as letras LeC não são variáveis, e por is¬ 
so a definição deve ser digitada tal qual 
sua apresentação na linha 10. Toda vez 
que se especificar posição, deve-se usar o 
formato da linha 20 e nela as letras LeC 
são variáveis e devem ser substituídas pe¬ 
lo número da linha e coluna respectivos. 
VERSÃO: Microsoft 

Entrada de dados via console 

A leitura de dados do terminal é feita nor¬ 
malmente com a instrução INPUT, que 
provoca diferentes reações nos equipa¬ 
mentos. Por exemplo, no Sinclair e Spec- 
trum esta instrução causa a entrada de da¬ 
dos sempre na linha 22. Nas outras ver¬ 
sões do BASIC a entrada acontece na po¬ 
sição atual do cursor. Além disso, você já 
deve ter notado que esta instrução em 
qualquer equipamento faz com que um si¬ 
nal de interrogação seja apresentado no 
local onde a informação f6r pedida. Por es¬ 
te motivo, algumas versões oferecem ins¬ 
truções especiais, para entrada de dados, 
que não afetam a formatação de tela. 

LINE INPUT - Possibilita a entrada de 
string sem que a interrogação apareça na 
tela.. 


FORMATO: LINE INPUT A$ 

VERSÃO: Microsoft 
INKEYS - Verifica se alguma tecla foi 
pressionada e não altera nada na tela, nem 
faz com que o que foi digitado apareça no 
vídeo. 

FORMATO: LET 1$ = INKEYS 
VERSÃO: Sinclair, Spectrum, TRS-80e 
Microsoft. 

GET - mesma função que o INKEYS. 
FORMATO: GET 1$ 

VERSÃO: Apple 

Rotina para exibição 


Além dessas mudanças são necessá¬ 
rias alterações no programa; 

- ao invés de CLS, o BASIC Applesoft usa, 
para apagar a tela, a instrução HOME; 

- as instruções com formato PRINT AT L, 
C; “expressão” devem ser mudadas para 
a seguinte estrutura: HTAB C: VTAB L : 
PRINT “expressão”. 

Note que os comandos para exibição 
deixam de ter um complemento e têm um 
acréscimo de duas instruções de posicio¬ 
namento à sua frente, que têm a mesma 
função do AT. 

Na versão Microsoft que é caracteriza¬ 
da por processar sob o sistema operacio- 


FIGURA 3 


i0 REM Lau 
20 CLS 
30 PRINT RT 


Menu Principa 
4-0 PRINT RT 


- 

50 PRINT RT 
60 PRINT RT 
7'0 KKINT RT 
30 PRINT RT 

90 PRINT RT 
100 STOP 


Tela de Uidec 





RT i. 





£Z JL 


6 ^ 10:; 1, In c I ü s a 0 " 

3 .* 10; 2 . R 11 e r a c a o ‘‘ 
10,10; "3. Exclua ao” 
12,10; ”4..Relatoriü 

14,10,“S-FIM” 


A rotina da figura três apresenta uma te¬ 
la formatada no vídeo do Sinclair ou Spec¬ 
trum e nos servirá de exemplo perfeito na 
demonstração das mudanças necessá¬ 
rias para passarmos, para outras versões, 
o lay-out de vídeo da figura 2. 

Na versão Apple são necessárias modi¬ 
ficações na formatação das expressões, 
já que 0 programa foi feito para vídeos de 
22 linhas e 32 colunas e o vídeo do Apple 
tem 40 colunas. 

Deve-se proceder da seguinte maneira: 

- na linha 30 do programa deve-se acres¬ 
centar oito asteriscos às strings forma¬ 
das por estes caracteres e a coluna de 
exibição da expressão do segundo AT 
passará a ser 12 e a coluna do terceiro 
AT, passará a ser 38; 

- na linha 40 do programa deve-se acres¬ 
centar oito “-” no início das expressões a 
serem impressas pelos dois posiciona- 
dores nela encontrados; 

- da linha 50 a 90 do programa, as colunas 
de impressão devem ser mudadas para 
15. 


nai CP/M, a formatação das expressões 
dependerá do uso ou não do cartão de 80 
colunas. Por este motivo, não daremos as 
modificações de lay-out, mas apenas as 
de programa. 

A versão linha 20dependerá do equipa¬ 
mento. Na maioria das.vezes, a instrução 
para apagar a tela é PRINT CHR$(12). 

Torna-se necessário acrescentar uma 
linha antes da 30 para fazermos a defini¬ 
ção da função de posicionamento de exi¬ 
bição. O formato da expressão pode ser; 
15 DEF FNT$(L,C) = CHR$(27) + “Y” + 
CHR$ (L-f-31) + CHR$(C + 31) 

Em seguida, deve-se alterar todos os 
PRINT AT L,C para PRINT FNT$(L,Ç). 

Na versão TRS-80 existe a necessidade 
de uma profunda mudança em tudo, já 
que a dimensão de sua tela é completa¬ 
mente diferente. No programa, todos os 
PRINT AT são mudados para PRINT®, e 
ao Invés do número da linha e da coluna, 
nós teríamos que indicar a posição de exi¬ 
bição. 
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Formatando variáveis para exibição 

A versão Microsoft do BASIC oferece 
aos seus usuários uma instrução que per¬ 
mite formatar as variáveis para impressão. 
Este comando é o PRINT USING, que co¬ 
mo 0 nome diz, imprime (PRINT) usando 
(USING) determinado formato. 

Como as outras versões do BASIC não 
oferecem a seus usuários este comando 
nem nenhum semelhante, resolvemos de¬ 
senvolver uma rotina para os compatíveis 
com o Sinclair e Spectrum que simula es¬ 
te comando, aliás simula três característi¬ 


cas de comando PRINT USING, trabalhan¬ 
do com números: 

- permite que você defina a quantidade de 
casas decimais que o seu número terá; 

- permite que o número tenha, a cada três 
dígitos, um ponto de separação; 

- possibilita ao usuário definir se deseja 
ou não que os caracteres em branco, à 
esquerda, sejam preenchidos com aste¬ 
riscos. 

As únicas observações negativas que 
temos a fazer é que o número não pode ter 
uma parte inteira maior que oito dígitos e 


10 REM Si ffiU I.ando USING 
20 CLS : INUERSE 1: PRINT RT 0 
.. 7; " 5 i fíi U I 3 n d O USING " : INUERSE 0 
30 PRINT RT 3,0; “NLiriiero : " ; 

4-0 INPUT n : IF n:>999993S9 THEN 
GOTO 4.0 

Su PR INT n j hT s , 0 i " ua s 3 s d a c I til 
a i s : 

60 INPUT d 

70 PRINT d ; RT 7,0;"C:âsas. intsi 
ras:"; 

S0 INPUT i : IF i ::-S THEN GOTO 8 

0 

90 LET ii = i: PRINT i ; RT 9,0.; "R 
=• te r i s coa (a ..ti ) .- " ; 

100 INPUT 34: IF 3$::::-"a" RND 3$ 
•Í :> ■■ S RND a $ " n " RND a $ •; :>" N " TH 

EN GOTO 100 
110 PRINT 3$ 

120 LET ri$=STR$ INT n 
125 LET U!$ = "" 

130 LET ::::=0 
140 LET l=LEN n$ 

150 IF l-íi THEN LET il = t 
160 IF l;>8 THEN LET n$=ri$(L-8 T 
0 l) 

170 FOR f = L TO l-il-l-1 :5TEP -1 

130 LET X=X-rl 

190 LET w 4 =n 4 f f .' -HO $ 

200 IF f=X THEN GOTO 220 

210 IF ::-í=3 QR x=6 THEN LET W$ = “ 

. " +W $ 

220 NE.XT f 

230 IF d=0 THEN GOTO 262 
240 LET dl=n-INT n 
250 IF dl::-0 THEN LET dl=dl*10td 
LET dl=INT dl 
260 LET W$=Uí 44.“ , ■■+STR4 dl 
262 LET ri$=Ui4 

265 IF 3 $ •; :> " a " RND a $ <> " S " THEN 

GOTO 330 

270 LET t=d-i-l + i 

230 LET a=LEN W4 

300 FOR f=a-)-l TÓ t 

310 LET n$ = "*"-i-ri$ 

320 NE.XT f 

330 PRINT RT 11,5;n $ 

340 STOP 


O 


sua parte decimal pode ficar alguns centé¬ 
simos distorcida, isso devido ao armaze¬ 
namento da variável em memória e tam¬ 
bém pelos processamentos realizados 
quando o programa roda. 

Caso você junte esta rotina a algum 
programa saiba que a variável n deve con¬ 
ter o número a ser exibido, a variável dde- 
ve conter a quantidade de casas decimais 
e as variáveis / e i1 devem conter a quanti¬ 
dade de números que compõem a parte 
inteirado número. 


I5i rrrU Uarr dO: 


Nutiíe ro ; 999324,45 
Cas as de c i fíiâ i s ; 2 
Casas inteiras: 8 
Rs te r i s COS (s .-ti < : s 
*933.324,44 


Tente Esta! 


Se você possui um APPLE ou compa¬ 
tível e deseja abrir um arquivo seqüêncial, 
antes de iniciar seu programa de cadas- 
tramento, então use esta rotina. 


Í0 REft CRIWfOO ARSUIVO 
20 REH EH DISCO HO 
30 REH BASIC DO APPLE 
50 Dl = CHRI (4) 

60 INPUT "NOHE DO AR9UIV0";AI 
70 PRINT Di;''0PE.H";AI 
100 PRINT DÍ;"HRITE";AI 
110 PRINT "PRIHEIRA FRASE DO AR 
0IJIUO" 

120 PRINT Di;"CLOSE"?At 
130 END 
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POR DENTRO DO APPLE 


Polígonos 

Estrelados 


Aprenda a desenhar 
polígonos, estrelas, círculos, 
e muitos outros efeitos 
“estrelados”, como os das 
figuras ao lado. 


Cesar de Afonseca e Silva Neto 
Wilson José Tucci 


orno fazer? 

O programa pergunta pelo raio 
da circunferência circunscrita ao 
polígono. Repare que, uma circunferência 
pode ser descrita como um polígono de 
muitos lados, e este se torna o algoritmo 
utilizado na sub-rotina 650-690, que dese¬ 
nha uma circunferência com muita rapi¬ 
dez. Na realidade, estamos desenhando 
um polígono de 60 lados. 

Em seguida, o programa pergunta pelo 
número de vértices do polígono e pelo sal¬ 
to. Bem, 0 número de vértices está claro o 
que significa, mas o valor salto, merece 
uma melhor explicação. 

Quando entramos com o número de 
vértices do polígono, o programa montará 
duas matrizes: X( ) e Y( ). Estas matrizes 
conterão as coordenadas X e Y dos V vérti¬ 
ces do polígono, respectivamente. 

O valor do salto (variável ST) determina¬ 
rá em que ordem serão traçados os lados 
do polígono. Se o valor do salto é 1, a roti¬ 
na de desenho irá unirtodos os vértices do 
polígono, um a um. Se o valor de salto for 
maior, serão “pulados” ST-1 vértices. Atra¬ 
vés da combinação destes dois valores (V 
e ST), podemos obter os chamados “polí¬ 
gonos estrelados”. 

Observe atentamente a descrição das 
variáveis utilizadas no programa e até a 
próxima! 

Variáveis utilizadas 

AC - Valor do ângulo central do polígono. 
AN - Variável utilizada como índice nos la¬ 
ços FOR...NEXT(ANgulo). 

P -Passo. Valor correspondente a 1 grau 
em radianos. 

PI -Contém o valor 3,1415926, utilizado 
nas equações de seno e coseno. 

P() - Matriz que contém a posição lógica 
de cada vértice. Se P(i) contém o valor 
1 (verdadeiro)signlfica que 0 vértice já 
foi traçado. 



R - Raio da circunferência. 

ST - Valor do salto a ser dado. 

T - Período da circunferência (2 * PI). 

V - Número de vértices do polígono. 

XI -Coordenada X inicial. 

Yl -Coordenada Y inicial. 

X() - Matriz que contém as coordenadas X 
de todos os V vértices. 

Y() - Matriz que contém as coordenadas Y 
de todos os V vértices. 


Principais rotinas 

120-160 Definição das variáveis de con¬ 
trole. 

170-280 Formação da tela de texto. Esta 
tela continuará sempre na me¬ 
mória, bastando dar TEXT para 
acessá-la, instantaneamente. 

230 Sub-rotina que imprime uma va¬ 
riável M$ de forma centralizada, 
em uma posição vertical da tela 
(V), utilizando S espaços entre 
cada caracter da mesma. 

300-380 Entrada de alguns dados neces¬ 
sários. 

450-490 Cálculo das coordenadas X e Y 
dos vértices, montando as matri¬ 
zes X() e Y(). 

500 Chama rotina que desenha a cir¬ 
cunferência. 

510-570 Controle do traçado dos pontos. 

590-600 Aguarda que uma tecla seja 
pressionada. 

610-620 Truque ensinado na edição ante¬ 
rior, que apaga as matrizes que 
estão na memória sem termos 
que rodar o programa novamen¬ 
te, a fim de redimensioná-las. 

650-690 Rotina que desenha a circunfe¬ 
rência como sendo um polígono 
de 60 lados. 


P.D.A. 014 


m REfl polígonos estrelados 

líê REH HICROHOBBY m / JÜLHO 

Í20 PI = O m (1) 

Í3« T = 2 ^ PI 
i4S P = PI / Í8? 

ÍS@ S = 6? 

m XI Í40;YI 9Í 
Í7@ REK TELA DE TEXTO 
Í80 TEXT : HOHE 

m INVERSE : PRINT SPC( 38 
FOR I = 2 TO 22? l^TAB 
l: KThB í: PRINT SPC( 1)?: HTAB 
401 PRINT SPCí í)i NEXT : VTAB 
7: PRINT 3PC( 38);":^': VTAB 
231 PRINT ^'1"? SPCÍ 33)?":"; 

1 NORNAL 

200 H5 = '' POLISOHOS = 3iS = 

2: G03UB 230 

210 HS ^ ESTRELADOS "iV == 5iS = 
í: GOSÜB 230 
220 GOTO 2^0 

220 H = (40 - ( LEN (NS) + ( LEN • 
(Hí) - 1) « S)) / 2: POKE 26 
,Hi OTAB V: FOR I ^ 1 TO LEN 
(HS): KWERSE : PRINT HID5 
(H$,I,í)í SPC{ S ( LEN m 
) i > I))?: NEXT : NORMAL : 
RETÜRN, 

240 VTAB HT.AE 5: PRINT "ENTRE 
COH OS DADOS A SEGUIR" 

D 
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25Í VTAB i3: HTAB 3: PBINT "RAIO 
DO CIRCULO (FIK = TERMINAR) 
;é«" 

260 VTAB i6: HTAS 3: PRINT "VERT 
ICES DO polígono INSCRITO í" 

270 VTAB Í9: HTAB 3: PRINT "VALO 
R DO SALTO :l" 

280 POKE 33,3? 

290 REM 

ENTRAR DADOS 

300 VTAB Í3: HTAB 36: INPUT "";R 
i:R = UAL CRi): IF R5 = "FI 
M" THEN HOME : END 

3i0 IF R > 280 - XI OR R > Í92 - 
VI THEN f>RINT CHRi (7): GOTO 
300 

320 IF R = 0 THEN R = 60 

330 VTAB 16: HTAB 34: INPUT "";V 
í;V = VAL (VS) 

340 IF V = 0 THEN PRINT CHRÍ ( 
7): GOTO 330 

350 VTAB 19: HTAB 19: INPUT "";S 
Ti:ST = VAL (STÍ) 


360 IF ST > V THEN PRINT CHR$ 
(7): GOTO 350 

370 IF st = 0 THEN ST = 1 

380 IF ST > V / 2 TIO ST = V - 

ST 

390 AC = 360 / V 
400 OIM P(V),X(V),Y(V) 

410 REM 
BLOCO PRINCIPAL 

420 HGR2 
430 HCOLOR= 3 
440 I = 1 

450 FOR AN = P TO T STEP AC » P 
460 X(I) = R » COS (AN) 

470 Yd) = R * SIN (AN) 

430 I = I M 
490 NEXT 
500 GOSUB 650 
510 I = 1 

520 HPLOT X(I) + XI, Yd) + YI 
530 I = I + ST: IF I > V THEN I = 
I - V 

540 IF Pd) = I THEN GOTO 530 
550 Pd) = 1 


560 HPLOT TO Xd) + XI, Yd) + Y 
I 

570 GOTO 530 
5B0 POKE - 16368,0 
590 IF PEEK ( - 16384) ( 128 THEN 
590 

600 POKE - 16368,0 
610 REM LIMPAR AS MATRIZES 
620 POKE 109, PEEK (107): POKE 1 
10, PEEK (108) 

630 TEXT : POKE 33,39 
640 GOTO 290 
650 REM 
CIRCULO RÁPIDO 

660 AC -■ 6 

670 HPLOT XI + R - 1,YI 
660 FOR I = 0 TC T STEP AC » P: HPLOT 
TO X! + R * COS d),YI + R 
» SIN (I); NEXT ; HPLOT TO 
XI + R - 1,YI 
690 RETURN 


O 


Tente Estas! 


T ente rodá-lo no TK-90X e depois nno- 
difique-o para conseguiras mais es¬ 
tranhas formas. 
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Coleção 

O Computador na 
Esoola 



S ervir de suporte didático e de apoio 
para aplicações dos recursos da in¬ 
formática, nas salas de aula é a prin¬ 
cipal função e objetivo desta coleção. 

Como 0 título muito bem diz - “O Com¬ 
putador na Escola” é uma coletânea de 
seis livros que reúne: "Aulas de Matemáti¬ 
ca”; "Aulas de Matemática Financeira”; 
"Logo: Teoria e Prática”; "Linguagem BA¬ 
SIC e Programas para Matemática”; "Au¬ 
las de Química”; e "Aulas de Física”. 

Segundo os seus autores (Vicente Paz 
Fernandez, Antonio Nicolau Youssef, 
Márcio Pugliesi, HorChi Yuen, Fernando 
José de Almeida, Maria do Carmo Men¬ 
donça e Eduardo Castor), a partir da pre¬ 
sença quase que diária do computador na 
escola ou em casa, este "rapidamente vai 
assumindo um papel importante no pro¬ 
cesso ensino-aprendizagem, trazendo ao 
ato de estudar uma nova motivação.” 

Desta forma, torna-se premente uma 
publicação do nível eJntuito destas obras. 

No início de cada livro, os autores dis¬ 
sertam sobre a potencialidade da informá¬ 
tica na educação e afirmam que o aluno, 
ao executar programas, previamente ela¬ 
borados, ele pode concentrar os seus es¬ 
forços no desenvolvimento do raciocínio 
lógico, "deixando para o computador o 
trabalho de execução de cálculos”. 

Em suma, o estudante passa de mero 
ouvinte (espectador passivo) a um partici¬ 
pante ativo do aprendizado, pois "passa a 
não se limitar a questões preparadas, com 


valores inteiros conhecidos, podendo re¬ 
solver também problemas com valores e 
medidas que se aproximam mais, daque¬ 
les, da realidade imediata”. 

Como exemplo do que foi dito acima, 
está a própria utilização do microcompu¬ 
tador no aprendizado da Matemática, da 
Física, da Química e de outras matérias. 
Esta relação com a microcomputação es¬ 
tá patente em um dos livros desta coleção 
("Linguagem BASIC e Programas para 
Matemáticas”), onde através do ensina¬ 
mento do BASIC são introduzidos concei¬ 
tos de Matemática. 

Os leitores, ao adquirirem esta Cole¬ 
ção, não irão precisar seguir uma ordem 
para lê-los, já que cada livro trata de um as¬ 
sunto diferente. No entanto, para falarmos 
sobre eles determinamos uma ordenação 
aleatória. 

O primeiro deles é "Aulas de Matemáti¬ 
ca” que aborda uma série de temas que 
vão desde conjuntos, funções, trigonome¬ 
tria, progressões à análise combinatória, 
polinómios e números complexos. 

Ao final de cada tópico, os autores apre¬ 
sentam uma seqüência de exercícios que 
serão resolvidos por meio de programas. 

Juros simples, desconto simples, juros 
compostos, anuidades, sistemas de 
amortização, fluxo de caixa, inflação e ta¬ 
xas, análise de balanço etc. Estes assun¬ 
tos poderão ser encontrados no "Aulas de 
Matemática Financeira”, além dos exercí¬ 
cios no final de cada tópico. 

"Logo: Teoria e Prática” é o terceiro li¬ 
vro da série que tem o intuito de fornecer 
as ferramentas básicas para o uso da lin¬ 
guagem Logo no computador. Nas suas 
151 páginas, o usuário encontrará: os co¬ 
mandos iniciais, programação com o Lo¬ 
go, 0 uso do disco, atividades com o Logo 
etc. 

Dividido em duas partes, o "Linguagem 
BASIC e Programas para Matemática”, 
primeiramente, oferecem ao leitor noções 
de: processamento de dados, introdução 
ao BASIC, comandos, utilização de fun¬ 
ções etc. Na parte dois o assunto é Mate¬ 
mática, onde esta ciência é ensinada com 
0 auxílio da informática. 

Os dois últimos livros, "Aulas de Quími¬ 
ca” e "Aulas de Física”, seguem o mesmo 
esquema dos anteriores. O de Química 
analisa, entre tantos pontos: Ligações, Ci¬ 
nética Química, Titulometria, Termoquí- 
mica e Eletroquímica. Já o de Física, o lei¬ 
tor se deparará com os seguintes assun¬ 
tos: Mecânica, Termologia, Óptica e Eletri¬ 
cidade. 

Vale dizer ainda que, no final de cada 
obra, uma tabela é apresentada com a 
conversão dos programas oara as linhas 
TRS-80, Sinclair e Apple. M.R. 


L. 015 

Banco de Dados 
para o TK-90X 


Manoel Silva Rodrigues 
Editora Campus 



P ara aproveitar ao máxi mo este texto, 
são imprescindíveis: "um micro¬ 
computador que use lógicaSinclair, 
qualquer um com um mínimo de 16K de 
memória RAM e um gravador. Por parte do 
leitor, conhecimento elementar de opera¬ 
ção do microcomputador em questão e da 
linguagem BASIC.” 

E assim que o autor começa a sua obra, 
dando uma orientação e expondo os pré- 
requisitos aos seus leitores, inerentes a 
esta publicação. 

"Banco de Dados para o TK-90X” é um 
livro que ensina a exploração profissional 
do TK-90X, direcionando o leitor para a 
criação de um programa em BASIC, que 
simula um Banco de Dados on-line, mo- 
nousuário e conversacional. 

Extremamente didático e voltado para 
os iniciantes, este livro (ao seu término)dá 
ao usuário um total domínio sobre o pro¬ 
grama apresentado (a ponto de serem 
possíveis alterações e complementações 
do l.eitor). 

Por ser um trabalho essencialmente 
prático, torna-se necessária a utilização 
concomitante do microcomputador, para 
acompanhá-lo. 

Esta obra aborda: estrutura do DB, 
constituição dos arquivos; criação de um 
menu de opções; eliminação de arquivos; 
salvar programas; memória ainda disponí¬ 
vel; chegada aos arquivos e registros; re¬ 
cuperação de dados; cálculo de salário lí¬ 
quido; inclusão de registros em arquivos 
já criados; ordenação de arquivo; imple- 
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mentaçâo de diretório; salvamento e recu¬ 
peração do DB e de seu diretório. 

Segundo o seu autor, com este livro, o 
leitor poderá ver o programa crescer aos 
poucos, acompanhando o seu desenvolvi¬ 
mento e desta forma, servirá também co¬ 
mo um modelo de idealização de outros 
programas. 

Manoel Silva Rodrigues é professor de 
Microinformática da Faculdade Simon- 
sen. Analista de Sistemas da Rede Ferro¬ 
viária Federal e colaborador de diversas 
revistas especializadas. M.R. 

o 


Arte e Gráficos no 
Apple ll/lle 

William H. Dewitt 

Editora Livros Técnicos e Científicos 



L embre-se, o computador é o índio, 
você é 0 chefe!” 

É com esta afirmação que o autor 
encoraja os seus leitores a entrarem na 
área de computação gráfica. 

Dirigido aos usuários de computadores 
da linha Apple, esta publicação é uma in¬ 
trodução para iniciantes em gráficos. No 
entanto, William Dewitt parte do pressu¬ 
posto que 0 leitor já tenha experiência em 
programação BASIC, seja familiarizado 
com 0 "Applesoft Tutorial” e "Applesoft 
Basic Programming Training Manual"; 
que esteja operando com 48 K de memó¬ 
ria; use um ou mais disk-drives e possua 
um monitor colorido. 

Com a finalidade de ser um manual pa¬ 
ra aqueles que queiram criar imagens nos 
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seus Appies, "Artes e Gráficos no Apple 
ll/lle” atinge o seu objetivo. 

No primeiro capítulo são apresentadas 
as "ferramentas” necessárias (operacio¬ 
nais e de programação) para o usuário es¬ 
crever programas gráficos corretamente. 
Isto envolve números randômicos e es¬ 
quemas de cálculos, além da seqüência e 
outras convenções. 

Comandos gráficos de baixa resolução 
e 15 programas ilustrativos, que demons¬ 
tram 0 "uso de comandos de baixa resolu¬ 
ção na geração de imagens que vão desde 
um simples ponto até um fluxograma di¬ 
nâmico”, são expostos nos capítulos dois 
e três. 

Já os capítulos quatro e cinco mostram 
os comandos gráficos de alta resolução. 

A criação de formas e tabelas sem a uti¬ 
lização de números binários ou hexadeci¬ 
mais é exibida nos capítulos seis, sete e 
oito. 


No capítulo nove são postas em prática 
as técnicas de programação, anteriormen¬ 
te aprendidas, para a criação de imagens 
no computador. 

Os leitores podem aprender ainda, com 
este livro, como armazenar "figuras com¬ 
pletas” para recuperação e exibição como 
um "slide show” e como obter cópias das 
imagens desenvolvidas. 

Num total de 60 programas, que ilus¬ 
tram todas as técnicas apresentadas no 
decorrer do livro, além de fotos e dese¬ 
nhos, 0 leitor com isto encontrará um bom 
subsídio para soltar a sua imaginação e 
criatividade para conquistar o universo 
dos gráficos de alta e baixa resolução. 

William Dewitt é presidente da Compu¬ 
ter Art., lecionou gráficos na Universidade 
de Rochester e é membro do Institute of 
Fellows, Rochester Institute of Techno¬ 
logy. M.R. y. 


Outros 

Lançamentos 

MUMPS - Guia do Usuário 


Editora McGraw-HilI 



dBASE lil - Guia do Usuário 

Edward Jones 
Editora McGraw-HilI 



TRS-80 - Programaçáo 
Usando Arquivos de Dados 

Le Roy FInkel ■ Jerald Brown 
Livros Técnicos e Editora ■ LTC. 



Uviosmais 
vendidos no mês 
de Julho/86 

Profissionais: 

- Aprofundando-se no MSX 
Editora Aleph 

- Lotus 1-2-3 - Guia do Usuário 
Editora McGraw-HilI 

- Redes locais de computadores - 
Tecnologia e Aplicações 
Editora McGraw-HilI 

- MS-DOS - Guia do Usuário 
Editora McGraw-HilI 

- Basic Avançado para o TK-90X 
Editora McGraw-HilI 

Universitários: 

- IBM-PC Programação Basic - Guia do 
Usuário - Editora McGraw-HilI 

- dBase II Soluções para 
microcomputadores - Editora Atlas 

- Introdução ao Sistema Banco de 
Dados - Editora Campus 

Livrarias consuitadas: 

São Paulo: Antena, Saraiva, Siciliano, 
Poliedro, Litec, Manduri, Teixeira, 5.® 
Avenida. 

Rio de Janeiro: Interciência 
Às livrarias de outros estados 
solicitamos que nos enviem sua 
pesquisa. /y 
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R.TK-90X 016 


Aulas 


Daniel José Burd 


N esta lição aprenderemos a enviar 
dados para o gravador e a recebê- 
los. Veremos também, as rotinas 
da ROM que geram sons. 

Manipulando o gravador cassete 

Quando mandamos o computador en¬ 
viar dados para o gravador, através do co¬ 
mando SAVE, dois blocos de bytes são 
deslocados. O primeiro bloco, conhecido 
como header, contém as seguintes infor¬ 
mações: 

- tipo de programa (exemplo; BASIC); 

- nome do programa: 

- tamanho; 

- endereço inicial. 

O segundo bloco é o programa em sí. 
Dessa forma, ao executarmos um 
LOAD, 0 primeiro bloco a ser lido será o 
header, o qual informará ao micro onde o 
programa deve ser armazenado, o nome 
do programa etc. 

A rotina LOAD DATA 

Quando desejamos ler dados do grava¬ 
dor através de instruções Assembler, de¬ 
vemos dar várias informações ao compu¬ 
tador. O computador necessita saber se o 
que ele vai receber é um header ou não, 
onde colocar o bloco de bytes, qual o ta¬ 
manho do bloco etc. Para informamos to¬ 
dos esses dados ao micro devemos usara 
seguinte convenção: 
acumulador - se for 0, implica em 
leitura ou escrita de 
header; 

se for 255 implica em 
leitura ou escrita de 
bloco: 


flag de carry - se for 0 implica em ve- 
rificação de dados 
(VERIFY); 

se for 1 implica na lei¬ 
tura de dados (LOAD); 
registradores IX - contêm o endereço a 
partir do qual devem 
ser colocados (ou en¬ 
viados) os bytes; 

registradores DE - contêm o tamanho do 
bloco. 

Após especificarmos todos os parâme¬ 
tros, basta dar um CALL LOAD DATA 
(0556h) e pronto. Aqui estão as possíveis 
combinações dos parâmetros anteriores: 

LOAD BYTES: 1d de.nbytes :nbytes = tamanho do bloco 
1d ix,início 

1d a.255 :nao header 

scf ;LOAD 

call LOAD DATA 
ret 


SAVEHEADER: 1d de,17 

ld ix,inicio do header 

xor a ;a = 0 implica em header 

call SAVE DATA 

ret 

Vamos, a título de exemplo, salvar os 
bytes que compõem a imagem desenha¬ 
da na tela. Como sabemos, de lições ante¬ 
riores, a região ocupada pela tela inicia-se 
no endereço 16384 e tem comprimento 
6912 bytes, incluindo a região de atribu¬ 
tos. 

Dessa forma, um programa que salva 
essa região é mostrado abaixo: 


aCXXXDII 00 18 

1dde,6912 

isalva 6912 bytes; 

30003 DD 21 00 40 

ld ix,16384 

laponta para o arquivo da 
tela; 

30007 3E FF 

ld a.255 

;indica que nâo é header; 

30009 CD C2 04 

call SAVE DATA 

30011 C9 

ret 



LOAD HEADER: 1d de.17 :17 bytes e o tamanho do 

header 
1d ix, ínico do header 
xor a 
scf 

call LOAD DATA 
ret 


VERIFYBYTES: 1d de,nbytes 
ld ix,ínicio 
1d a,255 
and a 

call LOAD DATA 
ret 


VERIFYHEADER: ld de,17 

ld ix,ínicio do header 
xor a 

call LOAD DATA 
ret 


Simples não! Para usá-lo, “suje” a tela 
com qualquer coisa (exemplo: PRINT AT 
10,10;“TELA 1”). Digite RAND USR 30000, 
não “dê” ENTER ainda, primeiro ligue o 
gravador (RECORD), e só depois dê EN¬ 
TER. 

Vamos agora “LOADar” a nossa tela: 


3050011 00 18 
30503 DD 21 00 40 
30507 3E FF 

30509 37 

30510 CD 56 05 
30513 09 


1dde,6912 
ld ix,16384 
ld a,255 
scf 

call LOAD DATA 
ret 


A rotina SAVE DATA (04C2h) 

Essa rotina usa os mesmos parâmetros 
da LOAD DATA exceto a flag de carry. Aqui 
estão os possíveis usos dessa rotina: 

SAVEBYTES: 1d de,nbytes 

ld ix, inicio iínicio do bloco a ser salvo 

ld a,255 

call SAVE DATA 

ret 


Agora ligue o gravador (PLAY), logica¬ 
mente, após rebobinar a fita) e só então 
“dê” RAND USR 30500. Aí está a sua tela! 

Você deve estar curioso quanto aos 17 
bytes do header. Veremos agora como 
criá-lo e lê-lo: 

O HEADER 

O /7eacyer possui o seguinte formato: 


BYTE 


0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

T 

N 

N 

N 

N 

N 

N 

N 

N 

N 

N 

B 

B 

1 

1 

P 

P 


I 1-,- NOME ÍNICIO 

TIPO — T — 


TAMANHO TAMANHO 

DO BLOCO DO PROG. 

BASIC 


D 
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A ROM DO TK-90X 


O byte 0 indica o tipo de programa: 

0 - implica em programa BASIC; 

1 - matriz numérica: 

2 • matriz alfanumérica; 

3-bloco de dados. 

os bytes de 1 a 10 contêm o nome do 


programa: 

os bytes 11 e 12 contêm o tamanho do 
bloco se o byte 0 for 3; 

os bytes 13 e 14 contêm o endereço ini¬ 
cial do bloco ou linha inicial do programa 
BASIC. 


os bytes 15 e 16 contêm o tamanho da 
área ocupada pelo programa BASIC. 

O programa referente às listagens A, B 
e C lê e exibe os dados do headeróe qual¬ 
quer programa. Procure entendê-lo. Vale a 
pena! 


30000 

16 

00 

05 

4C 

45 

49 

54 

4F 

3000S 

52 

20 

44 

45 

20 

43 

45 

41 

30016 

44 

45 

52 

16 

01 

05 

70 

6F 

30024 

72 

20 

44 

61 

6E 

69 

65 

6C 

30032 

20 

4h 

6F 

T-.l 

65 

20 

42 

“7 sr 

30040 

72 

64 

2E 

16 

0H 

03 

12 

01 

30043 

45 

5:“: 

50 

45 

52 

41 

4E 

44 

30056 

4F 

20 

43 

45 

41 

44 

45 

52 

30064 

2E 

16 

05 

00 

50 

52 

4F 

47 

30072 

52 

41 

4 D 

41 

3h 

16 

07 

00 

30080 

54 

49 

50 

4F 

39 

16 

09 

00 

30063 

54 

41 

4D 

41 

4E 

43 

4F 

39 

30096 

16 

06 

00 

49 

4E 

49 

43 

49 

30104 

4F 

2F 

4C 

49 

4E 

43 

41 

39 

30112 

16 

0D 

00 

54 

41 

4D 

41 

4E 

30120 

43 

4F 

20 

42 

41 

F3 

49 

43 

30123 

3P 

30 

35 

•” ”7 

36 

33 

62 

61 

30136 

73 

69 

63 

6D 

2E 

6E 

75 

6 D 

30144 

6D 

2E 

61 

õC 

66 

62 

6C 

6F 

30152 

63 

6F 

10 

27 

E3 

03 

64 

00 

30160 

0P 

00 

01 

00 

00 

41 

53 


30163 

45 

4D 

42 

4C 

45 

52 

20 

33 

30176 

16 

00 

00 

33 

16 

00 

00 

00 

30134 

00 

00 

00 

00 

00 

00 

21 

00 

30192 

40 

11 

01 

40 

01 

FF 

17 

36 


30200 

00 

ED 

B0 

23 

13 

01 

FF 

02 

30203 

36 

20 

ED 

60 

C9 

01 

BI 

75 

30216 

DD 

21 

C9 


DD 

56 

01 

DD 

30224 

SE 

00 

CE 

2F 

97 

3C 

ED 

52 

30232 

30 

FB 

19 

02 

DD 

23 

DD 

23 

30240 

03 

ID 

20 

ES 

11 

BI 

75 

01 

30243 

05 

00 

CD 

3C 

20 

C9 

11 

11 

30256 

00 

DD 

21 

D4 

75 

9F 

37 

CD 

30264 

56 

05 

C9 

3E 

02 

CD 

01 

16 

30272 

CD 

EE 

75 

11 

30 

7f; 

01 

41 

30230 

00 

CD 

3C 

20 

CD 

2E 

76 

CD 

30233 

EE 

7*=^ 

3E 

12 

D7 

3E 

00 

D 7 

30296 

11 

71 

75 

01 

0C 

00 

CD 

3C 

30304 

20 

11 

D5 

35 

01 

09 

00 

CD 

30312 

3C 

20 

11 

7D 

75 

01 

03 

00 

30320 

CD 

3C 

20 

39 

D 4 

75 

5F 

CB 

30323 

27 

CB 

27 

33 

21 

B6 

75 

5F 

30336 

16 

00 

19 

EB 

01 

05 

00 

CD 

30344 

3C: 

20 

11 

35 

75 

01 

0B 

00 

30352 

CD 

3C 

20 

29 

DF 

7H 

CD 

05 

30360 

76 

01 

10 

00 

11 

90 

75 

CD 

30363 

3C 

20 

29 

El 

75 

CD 

05 

76 

30376 

01 

li 

00 

11 

90 

75 

CD 

3 C 

30334 

00 

20 

29 

E3 

75 

CD 

05 

76 

C9 





LISTAGEM B 

30000 

MESS 1; 

DEFM 

22,0,5. “LEITOR DE HEADER” 

30019 


DEFM 

22,1,5, “POR DANIEL JOSÉ BURD.” 

300H3 


DEFM 

22,10,8,18,1, “ESPERANDO HEADER.” 

30065 

MESS 2: 

DEFM 

22,5,0, “PROGRAMA:” 

30077 

MESS 3: 

DEFM 

22,7,0, “TIPO:” 

30085 

MESS 5: 

DEFM 

22,9,0, “TAMANHO:” 

30096 

MESS 6; 

DEFM 

22,11,0, “IMÍCIO/LINHA:” 

30112 

MESS 7: 

DEFM 

22,13,0, “TAMANHO BASIC:” 

30129 

BUF: 

DEFb 

0.0,0,0,0,--BUFFER P/ IMPRESSÃO. 

30134 

MESS 8: 

DEFM 

“BASIC”; “M.NUM”, “M,ALF”, “BLOCO” 

30154 

BASE; 

DEFW 

10000,1000,100,10,1-—BASE DECIMAL 

30164 

HEADER: 

DEFb 

o,o,o,o,o,o.o,o,o,o,o,o,o,o,o,o.o,- - 1 




1—— armazena o header 


LISTAGEM C 

30190-CLS LD HL -16384 ^ 



LD DE - 16385 

LD BC-6143 

> LIMPA A TELA 


LD(HL),0 

LDIR 

INC hl' 

INC DE 

LD BC - 767 
LD(HL),32 

i 

> COLORE A TELA DE VERDE 

• 

LDIR 

1 


RET 

L 
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30213-TI: LD BC-30129 
LD IX-30154 
F2: LD D, (IX + 1) 

LD E, (IX -t- 0) 

LDA, 47 
ANDA 
F1: INC A 

SBC HL.DE 
JR NC, F1 
ADD HL, DE 
LD (BC),A 
INC IX 
INC IX 
INC BC 
DECE 
JR NZ,F2 
LD DE, 30129 
LD BC,5 

CALL8252;PRINT STRING 
RET 


;BUF 

;BASE 


Essa rotina transforma o conteúdo 
dos registradres HL em string e depois 
0 imprime. 


30254-LEHEAD: LD DE, 17 

LD IX, 30164 
XOR A 
SCF 

CALL 1366 
RET 


;HEADER 


; LOAD DATA 


LE HEADER 


30267-INÍCIO: 


; ABRE O CANAL 5 
: 30190 


LDA,2 
CALL 5633 
CALL CLS 
LD DE, MESS 1 

LD BC, 65 : 65 = COMPRIMENTO DA MESS 1 

CALL PRINT STRING, 8252 
CALL LEHEAD ; LEO HEADER 

CALL CLS 
LDA,18 
RST 16 
LDA.O 
RST 16 


FLASH 0 


} IMPRIME A 
MESS 1 


LD DE, MESS 2 
LD BC. 12 
CALL 8252 
LD DE, 30165 
LD BC, 10 
CALL 8252 
LD DE, MESS 3 
LD BC, 8 
CALL 8252 
LDA. (30164) 

LD e,A 
SLA A 
SLAA 
ADD A.e 
LD HL. MESS 8 
LD e,A 
LD D,0 
ADD HL, DE 
EX DE, HL 
LD BC.5 
CALL 8252 
LD DE. MESS 5 
LD BC. 11 
CALL 8252 
LDHL, (10175) 
CALL TI 


) 


IMPRIME A 

: PRINT STRING 
; INÍCIO DO NOME DO PRG 


} 


MESS 2 

IMPRIME O NOME 
DO PROG. 


} 


IMPRIME A MESS 3 
A CONTÉM O TIPO DE PROGRAMA 


} 

} 


MULTIPLICA A*5 


HL APONTA P/,0 TIPO DO PROG. 


} 

} 


IMPRIME O TIPO DE PROG. 


IMPRIME A MESS 5 

HL CONTÉM O TAMANHO DO PROG. \ IMPRIME O 

/ TAMANHO 


t> 
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A ROM DO TK-90X 


LDBC, 16 ^ 


LDDE, MESS6 

> IMPRIME A MESS6 

CALL 8252 J 


LD HL, (30177) 

; HL - INÍCIO OU LINHA INICIAL \ IMPRIME O 

CALL TI 

J INÍCIO PROG. 

LDBC, 17 

1 

LDDE,MESS7 

> IMPRIMEAMESS7 

CALL 8252 J 

f 

LD HL, (30179) 

: HL CONTÉM O TAMANHO DO PROG. BASIC ^ IMPRIME 

CALL TI 

> TAMANHO 

RET 

J BASIC 


Tabela B 



Som 

Existem duas formas principais de exe¬ 
cutarmos sons com o auxílio da ROM do 
TK-90X. 

A primeira usa a rotina BEEPER, e a se- 
gundaa rotina BEEP (ou SOUN D)de modo 
muito semelhante ao BASIC. Veremos co¬ 
mo usar cada uma: 

A rotina BEEPER (0385h) necessita, co¬ 
mo dados de entrada, a f reqüência da nota 
e a que duração. A freqüência fica nos re¬ 
gistradores HL e a duração nos DE, por 
exemplo: 

O comando SOUN D 1,0 pode ser simu¬ 
lado por: 


30000 11 05 01 

1d de,duração 

30003 21 6A 06 

1d h1,nota 

30006 C D B5 03 

call BEEPER 

30009 09 

ret 


Para calcularmos a duração e a nota, 
usam-se os seguintes algoritmos: 
duração = freqüência * tempo 
nota = 437500/f reqüência -30.125 

Verifiquequeafreqüênciadeum DO ou 
04 é 261.60 Hz (dada na tabela B). Se subs¬ 
tituirmos esse valor nas equações acima, 
para tempo igual a um segundo, teremos 
os valores de HL e DE. Verifique isso atra¬ 
vés do programa abaixo: 


10CLS 

20 INPUTTREQUENCIA (Hz) = ”:F 
30 INPUT“DURAÇÃO(s) = ”;D 
40CLS 

50 PRINT“HL = ”;437500/F-30.125 
60PRINT“DE =”:F*D 
70 PAUSE 9999 
80 GOTO 10 


Bom divertimento a todos. 


cniic 

CLUBE NACIONAL DO TK 


— Fitoteca com 1000 programas em todas as áreas. 

— Ganhe gratuitamente uma fita gravada por mês com 
10 programas de sua escolha. 

— Periféricos e livros com descontos especiais. 

— Intercâmbio de programas. 

— Sorteios mensais de periféricos. 

— Programas sob encomenda. 

~ Mensalidade; apenas Cz$ 106,00. 

Promoção especial: fique sócio e ganhe uma fita 
brinde com 5 jogos sensacionais para TK-90X, 

TK-20(X) e TK-85. 

Informações: Caixa Postal 6605 

CEP 01051 — São Paulo — SP 
Tel.: (011)222-5977 



Tente Estas! 

TK 90X 

1 INPUT 3$: LET C=L£N 
(aí) -1 : PRIWT 3$ 

8 LbT 3 =lb3S'4- 

9 FOR ®=0 TO 7 
10 FOR i=3 TO 3+C 
20 POKE i,0 

30 NEXT 1 

4-0 LtT 3 =3 -!-2b6 

50 NEXT ífi 


10 INPUT "L:nha : "; I : “ 
O 0 I una: ■ ■ í c ; " h a i d : ■■ 

20 FOR 1=1 TO 102 

■b U b I ■= — C -i- r ± :Z' I N 11 . ' o J 

LET b= i.-hr#COS (i/ô) 

4-0 PLOT 3 , b 
50 NEXT i 
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AMicrodigita 
lanía no Brasi 
0 micro pessoal 
de maior sucesso 
no munda 

A partir de agora a história dos 
micros pessoais vai ser contada em duas 
partes: antes e depois do TK 90X. 

0 TK 90X é, simplesmente, o único 
micro pessoal lançado no Brasil que 
merece a classificação de "software 
machine"; um caso raro de micro que 
pela sua facilidade de uso, grandes 
recursos e preço acessível recebeu a 


E aqui 0 TK 90X já sai com mais de 
100 programas, enquanto outros estão 
em fase final de desenvolvimento para 
lhe dar mais opções para trabalhar, 
aprender ou se divertir que com qualquer 
outro micro. 

0 TK 90X tem duas versões de 
memória (de 16 ou 48 K), imagem de 
alta resolução gráfica com 8 cores, 
carregamento rápido de programas 
(controlável pelo próprio monitor), som 
pela TV, letras maiúsculas e minúsculas 
e ainda uma exclusividade: acentuação 
em português. 

Faça 0 seu programa: peça já uma 
demonstração do novo TK 90X. 

A1ICRODIGI14L 


atenção dos criadores de programas e 
periféricos em todo o mundo. 

Para você ter uma idéia, existem 
mais de 2 mil programas, 70 livros, 30 
periféricos e inúmeras 
revistas de usuários disponíveis 
para ele internacionalmente. 


Chegou 0 micn) 
cheio de |]rogFania& 


Fihdda à ABICOMP 










*AIIRights reservedApple Inc. USA. 
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A1ICRODI6IT4L 


Chega ao Brasil o sucessor do Apple He* "Enhanced". 


Tire da cabeça tudo que você já teve, tem ou viu em matéria de 
micros em geral e Appies' em particular. 

É a primeira vez que chega ao Brasil um Apple ’ último modelo: 

0 TK 3000 He é uma versão ainda mais avançada do 
avançadíssimo Apple He ' "Enhanced", lançado em maio de 1985 
nos Estados Unidos. 

É 0 único que roda Totalworks e Supercalc 3a, entre milhares de 
outros. Faz em segundos o que os demais micros levam 
intermináveis minutos para fazer, tem memória básica de 64 
Kbytes lexpandível com placas até 1 Megabyte! e teclado 
numérico incorporado. 

Escreve em português com todas as letras e acentos e com 
maior facilidade do que uma máquina de escrever eletrônica. 


E, entre outras exclusividades, tem um design anatômico, para 
maior conforto do operador e produtividade no trabalho. 

Venha logo conhecer e reservar o seu TK 3000 He nos 
Revendedores Autorizados Microdigital. 

Os 8 anos-tecnologia que o separam dos outros micros, podem 
ser exatamente a distância que você vai colocar entre sua 
empresa e os concorrentes. 


nmi, 

/MICROOIGIUL 



































